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PREFACE 


This publication is an interim document which contains informa- 
tion on how to use the GE-625/635 JOVIAL compiler under the 
control of the GECOS operating system. It provides the infor- 
mation necessary to set up a deck for compilation and sub- 
sequently to execute the compiled program. An extended 
explanation of each error message produced by the compiler is 


included, although this is needed in only a few cases. 


For a concise description of the J3 JOVIAL language implemented 
on the GE-625/635 computer, the user should refer to JOVIAL 


Compiler Programming Reference Manual, CPB-1201. Additional 
helpful information can be found in GE-625/635 General Loader, 


CPB-1008 and GE-625/635 Programming Reference Manual, CPB-1004. 
This, when combined with the user information contained here 
and a working knowledge of the GECOS operating system, should 
enable an experienced programmer to write and debug JOVIAL 
programs on the GE-625/635. 


Chapter 1 discusses the three phases of the JOVIAL compiler 
and gives information concerning error detection and debugging. 
Chapter 2 describes the processes and procedures involved in 

a JOVIAL compilation. The appendixes provide supplemental 


information. 


Suggestions and criticisms relative to form, content, purpose, 
or use of this manual are invited. Comments may be sent on the 
Document Review Sheet in the back of this manual or may be 
addressed directly to Engineering Publications Standards, B-90, 
Computer Equipment Department, General Electric Company, 

13430 North Black Canyon Highway, Phoenix, Arizona 85029. 
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I. THE JOVIAL SYSTEM 


THE COMPILER 


The GE-625/635 JOVIAL compiler comprises three programs, 
which are called phases. Each phase operates on the entire 
JOVIAL program to be compiled and then passes its accrued 
information on to the next phase, either by leaving this 
accumulated data in common storage, if space requirements 
permit, or by leaving portions in common storage and using 


I/O devices for the remainder. 
Phase One 


In phase one, each complete JOVIAL statement is processed 
through that phase before the next statement is examined. 
Phase one converts the JOVIAL statement to a form called 
Polish notation, which is derived from the syntax or gram- 
matical rules of the language. Each statement remains in 
this type of notation through the rest of the compilation 
process. It is this Polish notation which can be temporarily 
stored on I/O devices between phases. The data descriptions 


and actual preset data remain in store* from phase to phase. 
Phase Two 


Phase two takes each statement, now in Polish, and processes 

it along with contiguous statements that constitute a logical 
set. This phase processes by blocks of code rather than by 
ingle statements. This allows certain optimization of code 
across statements, which the programmer may recognize upon 
examining the machine code produced. The information necessary 
to produce binary code is passed from phase two to phase three. 
Again, if necessary, temporary I/O storage may be utilized. 


*In conformity with the IFIP/ICC vocabulary, the device 


formerly called "memory" is now called “store." 


ie 


Phase Three 


Phase three, in essence, is the assembly portion of the compiler. 
It converts the output from phase two into machine code 
instructions for printing and into a binary card image file 


for immediate or later execution or both. 


In accordance with system requirements, the compiler will 

accept one program for compilation for each SJOVIAL card input 

to the GECOS system. The input is in the form of JOVIAL 
statements on cards and the output is an optional binary deck 

for later execution, and an optional binary file for immediate 
execution, and optional listings are produced for the source 
input and the machine code output. This information is described 


in detail in subsequent sections. 
ERROR DETECTION 


All phases of compilation have error detection. Syntactical 
errors and semantic errors are noted by error messages. The 
compiler error detection is related to the programmer by terse 
statements. If an error is found during phase one, the error 
message follows the JOVIAL statement. Errors found during 

phase two cause error messages to be grouped at the end of the 
source listing. All error messages have JOVIAL statement numbers 
associated with them, and those detected in phase one have an 
arrow pointing to the column of input data that the compiler 


interprets as the cause of the error. 


Also associated with the error message in phase one is a number 
giving the approximate character position within the statement 
where the error was detected. This number is used to determine 
the line position within a multicard statement. The arrow and 
character count may not always be accurate because of the tree 
or branch method of determining the syntax of a statement, but 
when considered with the error message, they are sufficient to 
locate the error. These error messages are described in Appen- 


dix A. 


OBJECT CODE DEBUG 


By specifying the proper option on the S$JOVIAL card, a programmer 
may have the compiler build DEBUG SYMBOL TABLE cards. This 
information is, in turn, used by the system loader to provide 
debug information at execution time. This option is discussed 
fully in Appendix B. 


2. JOVIAL COMPILATION 


INPUT 
Control Information 


The compiler control parameters are input by the GECOS system 
control card used to initiate a JOVIAL compilation. Any of 

the following parameters may be present or absent from the 
control card. Parameters must start in column 16, be separated 
by commas, and may appear in any order. When a parameter is 
omitted, the predetermined value of the pair of values is 
assumed. The underlined parameter for each pair in the follow- 
ing list is the one assumed. 


DECK Produce a binary deck for later execution 
.NDECK Do not produce the deck 


‘LSTIN Produce a listing of the source program 
NLSTIN Do not produce the listing 


LSTOU Produce a binary symbolic (GMAP) listing of the 
compiled program 
NLSTOU Do not produce the listing 


‘COMDK Produce a compressed source deck from the input deck 
NCOMDK Do not produce the deck 


DEBUG Produce a DEBUG SYMBOL TABLE for optional use by the 
system loader at execution time 
NDEBUG Do not produce the table 


The following is an example of a JOVIAL control card. The 
assumed values in this case are DECK, LSTIN, and NDEBUG. 


16171819 20{21|22 23}24 25|26|27)26| 29 ao ifcoa 
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Source Language 


Card Format. The JOVIAL source card has a free-field format 
from column 1 to 72. Columns 73 to 80 are reserved for deck 
identification and sequencing and are listed by the compiler. 
Column 72 of one card and column 1 of the next card are con- 
sidered to be contiguous. No source card may have a $ in 
column 1. Direct code formats are shown in Appendix D. 


Program Format. The first statement in a JOVIAL program must 
be a START. The last statement must be a TERMS. 


Deck Identification 


asin iO ak 


there must be an identification card. The compiler uses this 
card to create a SYMDEF to be used by GELOAD. There are 
three types of source input to the compiler: a program, a 
procedure, and data to generate a COMPOOL. (See Appendix C.) 
The format of the identification card for each of these is 


described below. 


Program 


Columns 1 to 6 contain PROGRM. Columns 8 to 13 may be 
‘blank or may contain a name of six characters or less, left- 
justified, to be used as the SYMDEF. If no name is present, 
a SYMDEF of six periods is created. 


Procedure 
Columns 1 to 6 contain PROCED. No other identification 


is necessary. The name of the procedure is used as the 
SYMDEF . 


COMPOOL Generation 

Columns 1 to 6 contain GENCOM. 
OUTPUT 
Listings 
There are three kinds of printer listings: 


Source Language Listing. The source language listing consists 
of one-line-per-card replication of the JOVIAL input deck. 


(See Figure 1.) 


Each line of source output has a number at the left-hand 
margin. This is the statement number of the last statement 
begun on that line. Statement numbering begins with zero for 
the START card. There also is a number at the right margin 
of the listing. This is a one for one input card count for 


altering purposes. 


Object Code Listing. There is an object code listing that 
corresponds to the output of the compiler. (See Figure 2.) 
The object code listing resembles an assembly program listing, 
and the following fields are located from left to right on the 
page. 


(1) Store location. This is relative to a base address 


of 0 since this is a relocatable binary deck. 
(2) Octal representation of binary (12 digits). 


(3) Octal representation of relocatable bits. 


-/- 


Figure l. 


IF HH $ 
BEGIN TTCAP = TTCAP+TCAP §$ 
COMP = CC(SBS) §$ YES(SBS) = 1 $ 


PRNT $ CAP = 0 $ TCAP = 
GOTO SR2 $ 
END 


Source Language Listing 


OS HH=08 


(4) Label field. This may or may not exist. If there 
is a label, it will be the original JOVIAL label 
or a generated label of the form nG where n is an 


integer. 
(5) Machine operation mnemonic. 
(6) Operand(s). 
(7) Source statement line number. 


Error Messages. Compiler error messages are of two general 
types, syntactical (construction) errors and semantic (usage) 
errors. The syntactical errors are detected during the first 
phase of compilation. Semantic errors are found during sub- 
sequent phases of compilation. Appendix A contains a descrip- 
tion of JOVIAL syntactical and semantic errors. As previously 
described, syntactical errors detected in phase one are noted 
by error messages that will be printed below the incorrect 
statement. Errors that cannot be detected at the exact time 
of occurrence (for example, BEGIN and END out of phase) will 
be noted when they become apparent. Even when critical errors 
occur in a program being compiled, the compiler will attempt 


to continue compilation. 
Binary Output 


If execution is specified, the compiler produces a binary 

card image file for execution immediately after compilation. 
If a binary deck is requested by the SJOVIAL control card, 
binary cards are produced. In either case, the deck structure 
produced is identical to that produced by a GMAP assembly 
described in the GE-625/635 General Loader manual under the 
heading "Relocatable Deck Description." 


aiPe 


000241 
000242 
000243 
000243 
000244 


002671 
002671 


000000 
102045 


0,DU 


000110 
000110 
000112 
000112 


INP+1,DU 000112 


The seven fields are labeled only to make this exhibit more meaningful. 


Object Code Listing 


APPENDIX A 
JOVIAL COMPILATION ERROR MESSAGES 


If, because of an error, a JOVIAL statement is not compiled, 
binary code to call the GECOS system is inserted and flagged with 
an E in the binary listing. (See Figure 3.) 


Syntactical errors are detected in phase one and are noted 
by error messages which are printed below the JOVIAL state- | 
ment in error. (Refer to Figure 4.) In the example there 
is no END for the TABLE declaration. The compiler discovers 
this upon encountering the symbol DEFINE in statement 6. 

The arrow indicates the point of discovery, as does the 
error character count 000000. In this particular occurrence 
there is no effect on the compilation, since the compiler 
assumes that the TABLE declaration is finished, which it is. 


The following list contains all current JOVIAL compilation 
error messages and their meanings and action. 


Statement Meaning and Action 
ALLOCATED MEMORY IS EXHAUSTED The compiler needs more 


storage and it is not avail- 
able. Compilation is 


- terminated. 


ALLOCATION TROUBLE The data being compiled are 
allocated inconsistently in 
an OVERLAY statement. 
Erroneous data allocation 
may result. 


210s 


-CI- 


0002 TABLE TABA V5 P § | GE080220 
0003 BEGIN ITEM TAA A 10S 5 $ GE0802 30 
0003 BEGIN 1.0A5 2.0A5 3.00A5 4.0A5 END GE080240 
0004 ITEM TAB A 20S 5 § GE080250 


0004 BEGIN 1084.80A5 1084.89A5 END GE080260 
0005 ITEM TAC A 10S 5S GE080270 
0005 | BEGIN -8.0A5 END GE080280 
0006 DEFINE IFEITHER "IFEITH" $ GE080290 

i 000000 


*KKERRYEXSTA 0006 MISSING END 


Figure 4. Syntax Error Example 


Statement Meaning and Action 


ALREADY ACTIVE The FOR statement being 
compiled is using a loop 
variable that has already 
been activated by a prior 
FOR. The fact is ignored, 
but it may result in 


erroneous code. 


ARRAY EXCEEDS REASONABLE SIZE The space required for 
ARRAY is greater than 
24,000, 9- No space is 
allocated. 


BAD STATUS RELATIONSHIP The status constant being 
compared to this status 
variable is not one of the 
previously declared legal 
values. The statement is 


not compiled. 


BAD XEC NAME The XEC parameter is not a 
procedure call or a Zero. 
The statement is not 


compiled. 


CIRCULAR DEF The expression being compiled 
| contains a redefinition (by 
the DEFINE declaration) 
which is improperly 
constructed. The statement 
using this definition is not 


compiled. 
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Statement Meaning and Action 


COMPILER ABORT. SEND DUMP TO There is a logic error in 
GENERAL ELECTRIC the compiler. 
COMPOOL NOT MOUNTED - A COMPOOL list has been 


encountered, but no COMPOOL 
input tape was mounted. 
COMPOOL list is not compiled. 


CONFLICTING USE The variable being compiled 
is being used in an improper 
context. The statement is 
not compiled. 


CONST OVFLO The exponent part of the 
constant being compiled is 
larger than nor The 


exponent is set to zero. 


EXIT BUFFER HAS OVERFLOWED The compiler has used up the 
allocated buffer area for its 
recursive calls. Compilation 


is terminated. 


FIELD TOO BIG An item has been declared 
too large for its type. 
The declaration is not 
compiled. 


Sips 


Statement 


FILE NAME REQUIRED 


ILLEGAL CHARACTER 


ILLEGAL CONVERSION 


ILLEGAL DATA LENGTH PARAMETER 


ILLEGAL FOR COMPOUND 


~15+ 


Meaning and Action 


An I/O request has been 
found without a file name 
in the parameter reserved 
The I/O statement 
is not compiled. 


for it; 


A character input from the 
source deck is illegal. It 


is ignored. 


In the assignment or exchange 
statement being compiled, the 
data types are incompatible; 
that is, no implied conversion 
is possible. The statement 

is not compiled. 


The parameter defining the 
length of the data in the 

I/O transfer is illegal. 

The statement is not compiled. 


An IF statement followed 
immediately by an END, which 
is not associated with a FOR, 
is an illegal construction. 
The IF statement is not 
compiled. 


Statement Meaning and Action 


ILLEGAL PRIMITIVE A name beginning with a prime 
character has been encountered, 
but it is not among the allow- 

' able primitives. The state- 
ment is not compiled. 


ILLEGAL STATUS ASSIGNMENT The status constant being 
assigned to this status © 
variable is not one of the 
previously defined legal 
values. The statement is 


not compiled. 


ILLEGAL TEST The TEST statement is 
attempting to test a loop 
variable that is not active. 
The TEST statement is not 


compiled. 


INCONSISTENTLY DECLARED The data being compiled are 
improperly declared. The 


declaration is not compiled. 


“JUNK PROGRAM A combination of errors so 
extensive that the compilation 
cannot continue has been detected; 
compilation terminates 


LOOP CONTROL Multiple three-factor FOR 
statements are used in 
parallel. Erroneous code may 
be generated. 


s16% 


Statement 


MISSING ASTERISK 


MISSING BEGIN 


MISSING DOLLAR 


MISSING END 


MISSING SLASH 


MISSING START 


ai 7= 


Meaning and Action 


The asterisk (*) is omitted 


from the exponentiation 


' brackets. It is assumed. 


There is an absence of a 
BEGIN in a PROC declaration. 
The BEGIN is assumed. 


The dollar sign ($) is missing 
from a subscript bracket or a 
statement terminator. It is 


assumed. 


In processing a statement in 
which an END is required, the 
compiler has encountered a 
symbol that is not syntacti- 
cally correct and that is not 


an END. Or, the end of a 


program was reached with a count 
of begins greater than the count 
of ends. The effect on compilation 
depends on the particular occurr- 


ence. 


The slash (/) is omitted 
from the absolute value 
brackets. It is assumed. 


The START card does not 
appear first in the JOVIAL 
program deck. It is assumed 


Statement Meaning and Action 


MUL DEF The statement name currently 
being used has not been defined 
more than once in this program. 
Erroneous references to this 
label result. 


MULTI STA ERROR This is a combination of 
errors in contiguous state- 
ments. The statements are 
not compiled. 


MULTIPLE UNARIES Multiple arithmetic or Boolean 
unary operators (-, +, NOT) 
occur in an expression. The 
expression is evaluated as 
it stands. 


NAME NOT IN COMPOOL A COMPOOL list contains a 
mame that is not in COMPOOL. 


The name is ignored. 


NESTED PROC | The PROC statement being 
compiled is in the scope of 
another procedure declaration. 
The PROC statement is not 
compiled. 


NO PATTERN TABLE No pattern table was declared 
: | for this table, which was 
declared as LIKE. The LIKE 
declaration is not compiled. 
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Statement 


NO PROC FOR RETURN 


NOT TABLE ITEM 


PRECLUDED BY CONTEXT: 


PRESET CONST ERROR 


SUPERFLUOUS END 


Py eo 


Meaning and Action 


A RETURN statement appears 
outside the scope of a 
procedure declaration. The 
RETURN statement is not 
compiled. 


A name is subscripted that 
is not declared in a table. 
The statement is not 
compiled. 


A comparison of the usage 
of this variable or constant 
and its type indicates an 
inconsistency. The state- 


ment is not compiled. 


Something other than a legal 
constant is in PRESET LIST or 
there is a missing END. 
Remaining preset constants 


are invalid. 


There is an extra END or 
missing BEGIN in the program. 
This can be an indication of 
possible serious trouble. 

The effect on the compilation 
depends on the particular 


occurrence. 


Statement 


SYNTAX 


TWO FEW ARGS 


TOO FEW SUBSCRIPTS 


TOO MANY ARGS 


TOO MANY SUBSCRPTS 


Meaning and Action 


An error is detected in the 
construction of the state- 
ment currently being compiled. 


The statement is not compiled. 


The BIT or BYTE modifier 
being compiled does not have 
any defining parameters. 

The statement is not compiled. 


The subscripted item being 
compiled has fewer subscripts 
than were contained in its 
original definition. The 


statement is not compiled. 


The BIT or BYTE modifier 
being compiled has more than 
two defining parameters. 

The statement is not compiled. 


The subscripted item being 
compiled has more subscripts 
than were contained in its 
original definition. The 


statement is not compiled. 


Statement Meaning and Action 


UNDEF The statement name currently 
being used has not been 
defined in this program. 
Erroneous transfers may 
result. 


WORK BUFF HAS OVERFLOWED The compiler has used up the 
allocated working area. 


Compilation is terminated. 


S IN COMMENT 7 A S$ sign was encountered 
while processing a comment. 
Everything up to the $ is 
considered a comment, and the 
symbol after the $ is con- 
Sidered the beginning of a 


new statement. 
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APPENDIX B 


OBJECT CODE DEBUG OPTION 


The JOVIAL compiler generates a complete Debug Symbol Table 

when the debug option is specified on the SJOVIAL card. The 

user then may reference this information at load time. If 

he chooses to do so. LOADER DEBUG control cards must be included 
in his deck. These control cards are specified in the GE 625/635 
General Loader manual. 


There is not a one-to-one correspondence between the types of 
data used in the JOVIAL language and the types of data expected 
by the loader. The following lists give the data types that 
appear on the .SYMT. cards for JOVIAL declared data. 


JOVIAL ~SYMT. 
Boolean - Logical . 
Integer Double Double Precision 
Floating Real 

Integer Single Integer 
Status Integer 
Fixed Single Octal 

Fixed Double Octal 
Hollerith Octal 
Transmission Octal 
Statement Labels Instruction 
Procedure Names . Instruction 


The loader does not accept symbols in excess of six characters. 
The compiler uses the first six characters of a name to meet 
this requirement. 
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APPENDIX C 
COMPOOL 


INTRODUCTION 


The COMPOOL concept used for the JOVIAL compiler for the 
GE-635 is that of an auxiliary data declaration source. This 
appendix describes its preparation and use. The COMPOOL 
consists of JOVIAL declarations adhering to all the rules that 
apply to those declarations in the language. The COMPOOL can 
be used to control the environment of a system of programs and 
it also can serve as a basis for test design by using the 
preset feature to initialize inputs. 


COMPOOL PREPARATION 
Legality Checking 


The data to be used to construct the COMPOOL are first passed 
through phase one of the compiler as a JOVIAL program in order 
to error-check it. All the rules which apply to other data 
declarations of a JOVIAL program apply to COMPOOL data. The 
only difference is that the identification card, which always 
precedes the START statement, contains GENCOM in columns 1 to 
6. If no errors are detected, the COMPOOL generated program 
is called into store to create the COMPOOL file. If there are 
errors, the run is terminated at the end of phase one and a 
source listing is made, showing any detected errors. The 

same error messages applicable to a JOVIAL program's declara- 
tions are valid for COMPOOL data. The deck set up is shown 


in Figure 5. 
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COMPOOL Generation 


After normal error checking by phase one is complete, the 
COMPOOL generator is loaded. This program operates on the 
JOVIAL input cards as they are given to the compiler. It 
creates a directory of names of the data in the COMPOOL and 
the number of card image records of each unique set of data. 

A TABLE includes all the items declared in that table. This 
directory is a record that precedes the actual data on the 
COMPOOL file. The COMPOOL file then consists of a directory 
of data names, each of which must be 12 BCD characters or less, 
followed by the card images of the JOVIAL data. 


COMPOOL USE 


To use the COMPOOL declared data, a programmer uses a COMPOOL 
statement followed by the list of names from the COMPOOL that 
he wishes compiled into his program. These names are bracketed 
with BEGIN and END. This COMPOOL statement must appear in the 
JOVIAL program prior to the use of the data in a JOVIAL state- 
ment or a declaration requiring a pattern table from the 
COMPOOL. Figure 6 gives a sample portion of a program using 
this feature. 


In this example, all of the items in table ALPHA are compiled 
into the user's program. Table items are never requested by 


name; only tables, simple items, and arrays are so requested. 
The programmer must request to the operating system that the 


COMPOOL file be mounted prior to a compilation requiring data 
from that COMPOOL. 


2OU 


$SNUMB 
SIDENT 
S$ JOVIAL 


SLIMITS 
SDATA S% 
SINCODE IBMF 


GENCOM 
START 


DATA DECLARATIONS 


TERMS 
SEND JOB 


Figure 5. COMPOOL Generation Deck Setup 


=95< 


START "PROGRAM A" 


ITEM HOL 120 H $ 
COMPOOL 
BEGIN 
ALPHA 
ARRAYONE 
END 


BETA AA 
BOOL 


TABLE ALPHA1 L $ 
IF BOOL § 

BEGIN 

TEST1$ 

TEST2$ 

END 


Figure 6. COMPOOL Use 
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APPENDIX D 


DIRECT CODE 
INTRODUCTION 


The DIRECT statement in the JOVIAL language serves to define 

a set of operations which must be expressed in machine- 
oriented language. This language consists of legal GMAP codes. 
Each line of machine code is considered a symbol; thus, ASSIGN 
statements and DIRECT or JOVIAL brackets must not appear on 
lines containing machine code instructions. Direct code may 
address locations designated by names defined in JOVIAL. A 
label of a direct code instruction becomes a defined statement 
name as though defined on a JOVIAL statement. A statement 
name prefixed to the DIRECT bracket is considered to designate 
the first executable instruction within the DIRECT JOVIAL 
brackets. Index registers used within DIRECT JOVIAL brackets 
should be saved and restored within those brackets. 


INSTRUCTION REPERTOIRE 

The legal machine codes for use in DIRECT code are operation 
codes listed in Appendix B of the GE 625/635 Programming 
Reference Manual with the following inclusions: SXLn and 
-LXLn. In addition, the following two directives (pseudo codes) 
are allowed: ZERO and SYMREF. 


INSTRUCTION FORMAT 


The machine code instructions within the DIRECT code must 
adhere to the following format: 


Columns 1-6- label field 
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The label must be a legal GMAP label (that is, at least one 
alpha) containing no characters other than periods, alphabetic 


characters, or numerals. 

Column 7 even-odd field 
The letter E causes the instruction to be given an even 
address, and the letter O causes the instruction to be given 
an odd address. A blank causes no significance to be given 
to addressing in terms of even or odd. Any other character - 
is considered illegal. 

Columns 8-15 operation field 
Instruction mnemonic begins in column 8. 


Columns 16-72 location and comment field 


This field has three subfields: subfield 1, subfield 2, and 
subfield 3. 


Subfield 1 may contain an operand. 
Subfield 2 may contain an operand or a modifier. 


Subfield 3 may contain comments. 


Oo Oo 0 0 


Subfield 1 and subfield 2 are separated by a comma, 
and subfield 2 and subfield 3 are separated by a 
blank. 


An operand may be a JOVIAL name or label or a legal DIRECT 
machine code label or a constant of the form d, where d is a 
pure numeric decimal, or a constant of the form = O dd, where 
dd is an octal number. Modifier is a legal GMAP modifier 
(such as DU). Any blank encountered in columns 16-72 termi- 
nates subfield 2 and causes the remaining columns to be con- 


sidered as comments. 
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Decimal increments or decrements are allowed in subfield 1 and 
subfield 2. Either subfield may contain an asterisk which is 
translated as the address of the instruction of which this 
operand field is a part. 


Special consideration is given to the instructions STCA and 
STCQ: subfield 2 must contain two octal characters whose bit 
configuration represent the character positions of the data 
referenced in subfield 1 which will be stored. 
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APPENDIX E 


RESTRICTIONS 
The following are language variations in GE-625/635 JOVIAL: 
DUAL items are excluded 
STRING items are excluded 
Medium table packing is treated like dense table packing 
The J3X I/O are implemented 


GE-625/635 GMAP assembly code (excluding all MACRO instructions) 
is the only legal type of direct code 


To conform with the conventions of GECOS, a $ must not appear 


in column 1 of an input card 


To conform with the conventions of GELOAD, procedure names for 
which SYMREFS must be generated must not exceed six characters. 
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APPENDIX F 
FILE STATUSES AND I/O FUNCTION CODES 


The GE-625/635 JOVIAL compiler will implement the J3X I/O as 
defined in JOVIAL Programming Reference Manual. Although file 
declarations, IN statements, OUT statements and I0n statements 
are completely described in that manual, file statuses and 
function codes for file manipulation and data transmission are 


not listed; therefore, they are included here. 
STATUSES 


File status values which can be returned to an operating 


program are. 


Numeric Value Interpretation 


Normal termination after I/0 

a Null 

2 Segment Mark (Reading only - a 
one~character record other than 
octal 17 was encountered) 

3 End-of-File (A one-character 
record of octal 17 was encountered, 
or file has been closed by an 
OUT statement) 

4 Buffer-length error (Input area 
‘smaller than logical record) 

5 | Parity error 
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FUNCTION CODES 
IN Statements 


For IN statements of the form IN (FCN, filename) $, FCN may 
be any one of the following values: 


Numeric Value Interpretation 


Open Input file 

Close Input file 

Close Input with rewind 
Release Input reel 


Dn MW NY FF 


Close Input and open output 
OUT Statements 


For OUT statements of the form, OUT (FCN, filename) $, FCN 


may be: 


Numeric Value Interpretation 


Open Output file 

Close Output file 

Close Output with rewind 
Force Output End-of-Reel 


fF WN F 


Date Transmission Requests 


For data transmission request of the form I0On (FCN, filename, 
XEC, beginning address, length) $, FCN may be: 


Numeric Value Interpretation 
0 Read logical record 


= 39= 


Numerical Value Interpretation 


1 Read segment (up to next one- 
character record not octal 17-- 
Transmit data to store). 

Transmit print image 

Write logical record 

Punch binary record 

Punch BCD record 

Write segment mark (one-character 
record, not octal 17, 75, 76, 

or 77) 


N DO UW ff W 


Device Manipulation Request 


For a device manipulation request of the form, I0On (FCN, 
filename, XEC) $, FCN may be: 


Numeric Value Interpretation 
8 Move forward one logical record 
9 Move forward past segment mark 
(or end-of-file mark) 
10 © Move backward one logical record 
11 Move backward over segment mark 
12 Rewind 


ae 
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I. INTRODUCTION 


ee Background 


The purpose of this text is to provide the trained JOVIAL program- 
mer with a complete, rigorous, and concise manual to be used as a ref- 
erence in answering specific questions about the construction and mean- 
ing of elements of JOVIAL programs. 

This manual is organized topically, proceeding from the most prim- 
itive to the most complex elements of the language, with I/O and direct 
operations treated at the end. Each topic is divided into two parts-~--con- 
struction and meaning. 

Construction is indicated via a concise format described in sub- 
section I.C, Meaning is covered via brief prose descriptions in terms 
of basic computer characteristics, other elements, or combinations of 
simpler elements. 

Each page is annotated in the lower outside corner as to the topic 
covered, so that the programmer may "flip through" easily to a given 
topic. 

An index of constructions is provided, referencing the page on 


which each construction is defined. 


JOVIAL 


GE*GOO SERIES 


B. Computer-Oriented Features 


JOVIAL is not entirely a computer-independent programming lan- 
guage. Certain features of the language depend for their interpretation 
on features of the machine for which programs are to be written. These 


features are summarized below for the GE-635 object machine: 


Lis Internal storage: fixed-length word, binary 

a Word size: 36 bits 

35 Storage capacity: up to 256K words, using an 18-bit 
address 

4. Fixed-point arithmetic: two's complement; 36-bit signed 


full word; 72-bit signed double word is programmed 
5. Floating-point arithmetic: two's complement; 8-bit signed 


exrad, 28-bit signed signicand 


6. Character representation: 6-bit encoding (see Exhibit 1, 
p. 14) 
7. External storage: magnetic tapes, discs, card reader and 


punch, and printer 
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Cc. Construction and Meaning 


The remainder of this text is presented in a particular format with 
each element of the language being described first as to the form of its 
construction and second as to its interpretation. 

The method chosen for displaying the construction of the elements 


can best be described by example: 
l. The construction 
numeral: 0| 1] 2|3|4|5|6|7|8|9 


means that the element we chose to call a numeral is con- 
structedaseithera 0 ora 1 ora 2, etc. The | sep- 
arates alternative constructions. Any of the alternatives 


yields a correct construction of the element numeral. 


Ls The construction 


sign: [letter] | [numeral] | [mark] 


means that the element which we chose to call a sign is con- 
structed of either an element called a letter or an element 
called a numeral or an element called a mark. Thus a sign 
may be constructed as an A, a B, a 0, al, at, 
an =, etc. Theboxaroundthe name of the element differen- 


tiates it from actualcharacters forming part of aconstruction. 


33 The construction 


decimal number: |number|]. | number | number}. | . 
number 


means that the element we chose to call a decimal number is 

constructed in any one of the following ways: 

a. of a number element followed by a . followed bya 
number element 

b. of a number element followed bya . 

Cc. ofa . followed by a number element 

Any number of consecutively written elements and/or actual 


characters can define the construction of another element. 


4. The construction 


number: |numeral | numeral | 


means that the element we chose to call a number is con- 
structed of a numeral followed by zero or more numerals. 
The brackets enclose the part of the construction which may 
either be absent entirely or mayappear anynumber of times 


consecutively. 


For example, the construction 


subscript list: & | 


means that the element we chose to calla subscript list is 


constructed of one or more subscripts separated by commas. 


De We also could have defined the constructions in example 4 as 


number: | 
subscript list: | [subscript list], 


using recursive constructions. Thishas generally been avoided 
in the text for reasons of clarity, except that occasionally an 
element being defined will appear in the definition of some one 
of its parts. This is unavoidable in, for example, a variable 
being part of a numeric formula and a numeric formula being 

part of a variable (i.e., as a subscript); this merely indicates 


that subscripts can include subscripted variables. 


6. Using several of these concepts, we have the construction 


octal number: 0 ( | I) 


which means that the element we chose to call an octal 
number is constructed of an O followed by a ( followed 
by one or more octal numerals followed bya ). 
When an element is used in a construction but has not been defined 
in the preceding text, a reference is given to the subsection in which it 


is defined. 


8E-G00 SERIES —_—_ A 


a 


The method chosen for describing the meanings of the constructed 
elements is straightforward prose text. However, certain words and 
phrases used should be defined more fully: 

1, Implicit Means that the object being discussed does 
not appear in the written program but is 
understood to exist, either actually or for 
purposes of explanation. 

(ap Explicit Means that the object being discussed does 
or is to appear in the written program. 

3% Effectively Means that the operations being discussed 

athe CTfect ot) are understood to take place implicitly. 
This particularly refers to phrases like 
"replaced during execution," where such 
replacement does not actually take place 
but is understood to take place. 

Quantity Means an entity containing a value. 
op Entity Means some actual part of the object pro- 

gram which has an identity of its own, such 
as an instruction, a set of bits allocated 


to an item, and so forth. 


Os Value Means the value yielded by a quantity or 
by operations on other values. 
Actual Means the value without nonsignificant 
vatne | high-order zeros. 
Type of Means the category of value concerned, 
value 


whether the value represents an integer 

value, a truth value, etc. 

ahs Invoke Means to call into effect a set of operations; 
usually this means to "call" a subroutine. 

8. Must Means in most contexts that if the rule is 
not followed the results of the specified 
operations are not defined. 

9. Not defined Means that the results of the operations in- 

volved should be considered spurious and 


are not guaranteed to be meaningful. 


GE GOO SERIES rr 


10. Precision 
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Means the location of the binary point 
relative tothe right end of the computer 
representation of the value concerned: 
a positive precision indicates that the 
binary point is located to the left; a 
negative precision, to the right. Thus, 
the numbers: 
17.77%, with a precision of +3 means a 
value of 77.70, 


representation of 777 


and a computer 


77.77, with a precision of 0 means a 


value of 77.00, and a computer 
representation of 77 

77.778 with a precision of -3 means a 
value of 70.00, 


representation of 7 


and a computer 
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Il. SIGNS, VALUES, AND SYMBOLS 


A. Signs 
1. Construction 


sign: [Teter] | [mumeral] | [mark | 

letter: A|B|C|D|E|F|G|H|1|s|K|L|M|N| oO] P/Q|R| 
s| Tl) u|v| w|x|yv|z 

numeral: 0|1]| 2| 3| 4|5|6|7|8|9 

mark: +|-|*|/[=|-|.[]'1 {$14 


2. Meaning 
The alphabet of which JOVIAL symbols are constructed con- 
sists of 48 signs. These signs do not have individual meanings, but are 
used to form symbols. Other signs not already in the alphabet may be 
included as additional marks. Such signs would be those permitted by 
the hardware of the computer. The # mark is the explicit denotation 


(in this document) of a single blank space. 
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B. Delimiters 


1. 


Construction 


delimiter: | | [Separator] | | 
| 

operator: | [Felational operator] | 
| [Beauential operator] 
| ‘ASSIGN 


ae 


arithmetic operator: +|-|*| / 

relational operator: 'EQ|'NQ|'GR|'LS|'GQ|'LaQ 

logical operator: 'AND|'OR|'NOT 

sequential operator: 'IF|'IFEITH|'ORIF|'FOR|'TEST| 
'GOTO|'RETURN| 'STOP | 

peripheral operator: IN| OUT|1IO [number ]| WAIT 

modifier: 'BIT|'BYTE|'NENT|'ENTRY|'ENT|'ABS| 
'CHAR|'MANT|'NWDSEN|'ODD| 'ALL 

separator: .|,|=|==|$]|...|# 

bracket: (|)| ($|$)|(/| /)| (lL *)| "|'BEGIN| 'END | 
'DIRECT| 'JOVIAL| 'START| 'TERM 

declarator: 'ITEM| 'MODE| 'ARRAY|'TABLE|'OVERLAY| 


'SWITCH| 'CLOSE| 'PROC|'FILE| 'DEFINE 


[Founding descriptor] | [preset descriptor] | 
[Tength descriptor] | [Structure descriptor] | 
[packing descriptor] | [pattern descriptor | 


type descriptor: I| A| F| B | H| T | S 


JOVIAL 
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a: 


sign descriptor: S| U 
rounding descriptor: R 
preset descriptor: P 

length descriptor: V|R 
structure descriptor: S| P 
packing descriptor: N| M| D 


pattern descriptor: L 


Ze Meaning 
Delimiters have fixed meanings that are described later in 
the text. All delimiters shown above constructed with a leading prime, 
except for ", may also be constructed without the leading prime. These 


delimiters will be shown elsewhere in the text without the leading prime. 


00 6 eee SS 
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Cc. Values --Meaning 


There are four primary types of values in JOVIAL: numeric, 
Boolean, literal, and status. Numeric values may further be categor- 
ized into integer, fixed, and floating values. Literal values may further 
be categorized into Hollerith and transmission values. 

Integer values are integer numbers carried in fixed-point format in 
one or two words with zero precision. Their unsigned magnitude, m, 
must be 


71 = 10°!) 


2° -12m 20 (2 
Fixed values are decimal numbers carried in fixed-point format, in 
one or two words. A fixed value has a given precision, p, that determines 
its computer representation. 


The unsigned magnitude, m , of a fixed value must be such that 
pie =m - 2P] 22-7} -1 9 or [m ° 2P| = 0 


where the brackets indicate truncation of any fractional value. 
Floating values are decimal numbers carried in floating point for- 
mat in one word. Their unsigned magnitude, m _, must be confined to 


the following range: 


pileo's os erage piel 
Bee (atthe 497%) 
ee ae We eee ea aa 


The computer representation of floating values has a precision of 27 bits 
(i.e., about 8 significant digits). 

Boolean values are the truth values, true and false, carriedasa 
single bit. 

Literal values are computer representations of strings of signs. 


One or more signs (i.e., bytes) may be included in the string. Hollerith 
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me ee 
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values employ one type of six-bit encoding for the signs, and transmis- 
sionvaluesemployanother. Literalvalues are carried in as many words 
as necessary to hold the packed strings. Exhibit 1 displays the six-bit 
encoding for both types of literal values. | 

Status values are members of ordered sets of unsigned integer val- 
ues. Such a set may contain one or more members. The first member 
of aset is thevalue 0; the second, 1; the third, 2; and so forth. There 
may be up to gt members, and the values are carried as integer val- 


ues although referenced symbolically. 
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EXHIBIT 1 - ENCODING OF SIGNS 


Hollerith Encodin 
Second Octal Digit 


(1) & indicates a blank space. 


Note: 


W3Iq T2190 3A 
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D. Constants 


1. Construction 


constant: | | 
[iiteral constant || 

numeric constant: | | 

integer constant: E | | 
(decimal number] A 

floating constant: E | 

decimal number: : | . | 
| 

scale: + [number] | - [number] | [number | 

number: | (pamerat] 

octal number: © ( [octal numeral | [Setar numeral | ) 


octal numeral: 0|1|2|3|]4|5| 6|7 

Boolean constant: 0|1|FALSE| TRUE 

Hollerith constant: [number] H ( | 1) | 
transmission constant: T ( [sign] | I) | 
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status constant: V ( [identifier | ) | V ( [letter] ) 
identifier: | | 
part of identifier: | jit | 

! 


Ds Meaning 


Integer constants are explicit representations of unsigned 


integer values. The elements E are interpreted as meaning 


mEn=m-°: 10” 


where m is the first number and n is the number following the E. 
Fixed constants are explicit representations of unsigned, fixed 


values. The elements E are interpreted as meaning 


mEs=m-° 10° 


where m is the decimal number and s is the scale. The elements 
A establish the precision of the constant. 

Floating constants are explicit representations of unsigned float- 
ing values. The elements E are interpreted as in fixed constants. 

Boolean constants are explicit representations of Boolean values; 
0 is taken to mean false and 1 to mean true. 

Hollerith constants are explicit representations of Hollerith val- 
ues. The signs enclosed in parentheses are the signs represented. The 
number preceding the H must be an exact count of these signs. An 
octal number used as a Hollerith constant must specify 24 or less octal 
numerals which compose proper Hollerith signs. 

Transmission constants are explicit representations of transmis- 
sion values. The signs enclosed in parentheses are the signs repre- 


sented. The number preceding the T must be an exact count of the 
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signs. An octal number used as a transmission constant must specify 
24 or less octal numerals which compose proper transmission signs. 

Status constants are explicit, though symbolic, representations 
of status values. Each value ina set of status values (see subsection 
VI.A, Item Descriptions) is denoted by a unique identifier or letter, 
whose correspondence to the unsigned integer value is obtained bydec- 
laration and context. 

Each of the above type of constant must be written to represent a 


value within the limitations of its type as specifiedinthe last subsection. 
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E. Names and Indexes 


i ea Construction 


name: | 

set name: | : 
data name: | | | 
goto name: [statement name] | | 
switch name: | | 
simple item name: 

array name: 

table name: 

table item name: 

procedure name: 

file name: 

statement name: [ identifier] 

index switch name: 

item switch Aan 

file switch name: 

close name: 


index: 


Zs Meaning 
Names serve to identify the entities of a program environ- 
ment: simple items, arrays, tables, table items, procedures, files, 


statements, switches, and close routines. 
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No identifier used for a name may be constructed identically to 
any delimiter (GOTO, IN, LQ) or constant (TRUE, FALSE). Procedure 


names must not contain more than six characters. 


For purposes of reference by machine codes, names are associ- 


ated with entities of the object program as noted below: 


Indexes serve to identify members of an implicit set of integer- 


Simple item name--first word of simple item 

Array name--first word in array 

Table name--first word intable, excluding "nent word" 
Table item name--first word in which first instance 
of table item occurs 

Procedure name--first executable instruction in 
procedure 

File name--first word of corresponding status value 
Statement name--first executable instruction of 
statement 

Switch name--first executable instruction of switch 
routine 

Close name--first executable instruction of close 


routine 


valued quantities, which are primarily applied in controlling iteration of 
JOVIAL operations. 


The scope of the definition of names and indexes is described in 


subsection VIII.B, Scope of Definitions. 
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F. Symbols and Spacing 


l. Construction 


symbol: [delimiter] | [constant] | [name] | [index] | 
| [device code] | [machine code || 
| 
comment: "|[part of comment] |" 
part of comment: 3 [comment sign ] 
comment sign: | [numeral | l+l-le*t/lel.l.dq 
1 ($| $)| # 
logical file code: see subsection IX.A, File Declarations 
and Status 
machine code: see subsection X.A, Direct Statements 
defined identifier: see subsection VIII.C, Define Declarations 
accumulator designation: see subsection IX.B, Assign 


Statements 


as Meaning 


Symbols are the words and punctuation from which JOVIAL 
programs are constructed. A symbol cannot contain any embedded 
spaces except where explicitly permitted; spaces are only explicitly 
permitted as a separator and within literal constants, comments, and 
machine codes. 

Where a space may be required between symbols, it will be shown 
explicitly in the remainder of the text. Where it is shown, it is required 
only if the following sign is a letter, numeral, prime, or decimal point. 
Otherwise, any number of spaces may or may not appear arbitrarily be- 


tween symbols. 
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A comment may appear in place of any such arbitrary space within 
a program, except between the identifier and the following " in a de- 
fine declaration. The effect of a comment is exactly that of an arbitrary 


space. 
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Ili. VARIABLES, FUNCTIONS, AND FORMULAS 


A. Variables 


1 Construction 


variable: [numeric variable] | (Boolean variable] | 
| 

numeric variable: | | 

integer variable: | [index || [ bit variable| | 
|[ char variable | 

floating variable: 

fixed variable: | | mant variable] 

Boolean variable: | 

Hollerith variable: | 

transmission variable: | 

status variable: 

simple variable: [simple item name | 

subscripted variable: [array name| ($ $) | 
[fable item name] ($ [Subscript] $) 

subscript list: | P | 

subscript: 


bit, byte, nent, char, mant, and odd variables: see next 
subsection, Special Variables 


numeric formula: see subsectionIII.E, Numeric Formulas 
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Bs Meaning 


A variable serves to identify a quantity which may be used 
in formulas and elsewhere to yield a value, and whose value may be 
changed by assignment and other statements. 

The type of value assignable to a particular basic variable is de- 
fined in the declaration forthe simple item name, array name, or table 
item name; the type of value assignable to a particular nonbasic (i.e., 
special) variable is indicated by its construction (see next subsection). 
Integer variables yield andare assigned only integer values; fixed var- 
iables, fixed values; floating variables, floating values; Boolean vari- 
ables, Boolean values; Hollerith variables, Hollerith values; trans- 
mission variables, transmission values; and status variables, status 
values. A subscripted variable identifies a quantity which is either an 
instance of a table item or an element of an array. The value of a sub- 
script to a table item name designates the specific instance of the item 
desired, where 0O designates the first instance; 1, the second; 2, the 
third; and so forth. 

The values of the subscripts to an array name designate the spe- 
cific element of the array desired, where the first subscript from the 
left designates the specific row in which the element appears; the sec- 
ond, the specific column; the third, the specific matrix; and so forth. 
A O value yielded by a subscript designates the first set of elements in 
that dimension; a 1 value, the second set; and so forth. 

If the value yielded by a subscript is not an integer value, it is 
truncated to an integer value. That value must then be no less than 
zero nor greater than the declared length of the table or the declared 
size of the corresponding array dimension. 

The value of any variable is undefined untila value is explicitlyas- 
signed(e.g., by "preset," byassignment statement, by procedure, etc.). 


An index is implicitly declared as 118 S. 
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Bs Special Variables 


l. Construction 


bit variable: BIT ($ 5) ( ) 
bit designation: ; | 
first bit: 
number of bits: 
byte variable: BYTE ($ [ byte designation | $) 
( [basic variable] ) 
fir st byte: 
number of bytes: 
nent variable: NENT (| table designation] ) 
table designation: | 
char variable: CHAR ([basic variable]) 
mant variable: MANT ( ) 
odd variable: ODD ([basic variable|) | ODD ([index]) 


Zs Meaning 


The bit variable serves to identify a segment of the bit string 
comprising the basic variable as the bit variable. The basic variable 
may be of any type. The bit designation specifies the first bit in the seg- 
ment, and if more than one contiguous bit is in the segment, the number 
of the bits. 

The bits in the basic variable are numbered consecutively from left 
to right beginning with zero. The first bit is designated using this num- 
ber. The designated bits must form a subset of the bit string of the basic 
variable. The values of the numeric formulas, if not integer values, are 
truncated to integer values and must be no less than zero. The value of 


the bit variable is considered to be an unsigned integer value. 
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The byte variable serves to identify a segment of the byte string 
making up the basic variable as the byte variable. The basic variable 
must be of a literal type. The byte designation specifies the included 
bytes in a manner completely analogous to bit designation for bit vari- 
ables. ‘The value of the byte variable is considered to be the same type 
as the basic variable. 

The nent variable serves to identify the nent word of a variable- 
length tableas the nent variable. The table designatedis the one named 
or the one containing the named table item. The value of the nent vari- 
able is considered to be an unsigned integer value, whose magnitude 
must not exceed that of thedeclared maximum number of entries for the 
designated table. 

The char variable serves to identify the exrad of the basic variable. 
Thus, the basic variable must be a floating variable. The value of the 
char variable is considered to be an integer value between -127 and 
ti Zt: incisive: i.e., implicitly declared as 18S. 

The mant variable serves to identify the signicand of the basic var- 
lable. Thus, the basic variable must be a floating variable. The value 
of the mant variable is considered to be a fixed value less than or equal 
to l - ze! and greater than or equal to 23°F , and has a precision of 
l.e., implicitly declared as A 28S 27. 

The odd variable serves to identify the least significant bit of the 
basic variable. The basic variable must be a numeric variable. Fixed 
and floating variables are treated as though their bit pattern constituted 
an integer variable. The value of the oddvariable is false if the bit is a 


0, and the value is true if the bitisa 1. 
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Cc. Functions 


l. Construction 


| 

numeric function: | | 
| 

integer function: | | 

fixed function: 

floating function: 

Boolean function: 

Hollerith function: 

transmission function: 

status function: 

basic fimetion: . ) 


abs, nent, and nwdsen functions: see next subsection, 
Special Functions 
actual input parameter list: see subsection IV.E, Procedure 


Statements 


Di Meaning 


A function serves to invoke the execution of a procedure which 
yields a value that may be used in formulas. The value of a basic function 
results from the execution of the set of operations defined by the proce- 


dure declarationwith the same procedure name. The value of a nonbasic 
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(special) function results from the execution of certain implicit sets of 
operations (see next subsection). 

The type of value yielded by a basic function is defined in the dec- 
laration for the simple item within the procedure which has the same 
name as the procedure; the type of value yielded by a special function is 
indicated by its construction. 

The construction and meaning of actual input parameter lists are 
given in subsection IV.E, Procedure Statements. 


The value of a literal function must not exceed 12 bytes. 
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D. Special Functions 


ie Construction 


abs function: ABS (| numeric formula] ) 
nent function: NENT ( [table designation| ) 
nwdsen function: NWDSEN ( [table designation | ) 


Ze Meaning 


The abs function serves to identify the value of the unsigned 
magnitude of the numeric formula. The value of the abs function is con- 
sidered tobe of the sametype as the value yielded by the numeric formula. 

The nent function serves to identify the value of the nent word of the 
designated rigid-lengthtable. The value of thenent functionis considered 
to be an unsigned integer value. 

The nwdsen function serves to identify a value that is equal to the 
number of computer words occupied by an entry of the designated table. 
The value of the nwdsen function is considered to be an unsigned integer 


value. 


JOVIAL 
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E. Numeric Formulas 


1. Construction 


numeric formula: | [add operator] | 


add operator: +| - 


term: [TaStDr] | factor] | 

multiply operator: *| / 

factor: [EECORESTY] | [GETS] 

secondary: | 

primary: [BERGHE Constant] | [HERETTC VEFTEDIG] | 
fraREFTE Rance] | ( ROSE TORRE] | 
(7 [mamerie Forma] | 


2. Meaning 


A numeric formula serves to identify a set of operations for 
computing a numeric value. The value is obtained by executing the indi- 
cated operations on the values specified within the numeric formula. 

The value of numeric constants, variables, and functions has been 
described in other subsections. The value of a numeric formula enclosed 
in parentheses is simply the value of the enclosed numeric formula. 

The value of a numeric formula enclosed in the brackets (/ /) can 


be interpreted as: 
(/n/) = ABS(n) 


where n is a numeric formula. 


The value of a complex secondary is interpreted as: 
-00P.-s0 =-co« 00(Oop)...% 


where o is an add operator and p is a primary. 
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The value of a complex factor is interpreted as: 


oe s(*n*) (nt) (Ana), es emeis $38 ( m1) (mn) 8% (n). sxe 


22 SPH SKS, .. =... (S*ES)RKS... 


where s is a secondary and n is a numeric formula. 


The value of a complex term is interpreted as: 
««stfOfofvas = «i «(fofjof.... 


where f is a factor and o is a multiply operator. 


The value of a complex numeric formula is interpreted as: 
Jd ectotot ness oe eltOtyots: . 


where t is aterm and o is an add operator. 
Unary or binary addition and subtraction are indicated by + and -, 
multiplication and division by * and / , and exponentiation by ** . 
The constructions given in this subsection also indicate the order 
in which the operations are carried out. Thus, 
a. A primary is evaluated before any secondary of which 
it is a part is evaluated. 
b. A secondary is evaluated before any factor of which it 
is a part is evaluated. 
c. A factor is evaluated before any term of which itis a 
part is evaluated. 
d. A term is evaluated before any numeric formula of 
which it is a part is evaluated. 
No other ordering of operations is implied by the foregoing con- 
structions aside from that given in the interpretations above. 
Thus, if a function occurring ina numeric formula has side ef- 
fects involving other quantities in the formula (such as changing the 


value of some variable), the value of the formula is not defined. 
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The type and precision of the value yielded by a numeric formula 
is determined by the type and precision of the values of the constituent 
constants, variables, and functions. This determination is made ac- 
cording to the following rules: 

a. If the value of any constituent is a floating value, the 
result will be a floating value. 

b. If not item a, but any constituent is a double-word 
fixed value, the result will be a double-word fixed 
value; its precision will be that of the least precise 
fixed constituent after increasing the precision of 
any single-word fixed constituent by 35 places. 

Cs If not a or b, but any constituent is a double-word 
integer value and any other constituent is a single- 
word fixed value, the result will be a double-word 
fixed value; its precision will be that of the least 
precise fixed constituent. 

d. If not a, b, or c, but any constituent is a single- 
word fixed value, the result will be a single-word 
fixed value; its precision will be that of the least 
precise fixed constituent. 

e: If not a, b, c, ord, all constituents are integer 
values, and the result is an integer value--double- 
word if any constituent is double-word and single- 
word otherwise. 

Note that a 36-bit unsigned value is considered a double-word value in 
numeric formulas. 

All constituents are converted to the type and precision deter- 
mined for the result, and all operations are performed in that type and 
precision. Least significant bits lost due to conversion are truncated; 
any added are zero valued. 

If the actual magnitude of the result exceeds 35 bits (for single- 
word fixed or integer results) or 71 bits(for double-word fixed or inte- 


ger results), the result is not defined. 
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Certain operations on particular values are not defined. These 


are as follows: 


0 
0 
0 


omnon 
< 
s 
o 
H 
@ 
~~» oO 
Anu 


and b is not an integer value 
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F. Boolean Formulas 


l. Construction 


Boolean formula: [Boolean term|| #oR# [Boolean term | | 
Boolean term: [Boolean secondary || #AND# 
[Boolean secondary] | 
Boolean secondary: | #NOT # | [Boolean primary | 
Boolean primary: | [Boolean variable] | 
| ( ) | 
we lalion: | [literal relation ]| 
| | 
numeric relation: # # 
| 
[mumeric formala] | 
literal relation: # #f 
[# # 
[literal formula] 
aictue teletton: # # 


file status relation: see subsection IX.A, File Declarations 
and Status 

entry relation: see subsection IV.C, Entry Operations 

literal and status formula: see next subsection, Literal 


and Status Formulas 


SE-6OO SERIES —— 5° 


DN 


rah Meaning 
A Boolean formula serves to identify a set of operations for 
computing a truth value. The value is obtained by executing the indi- 
cated operations on the values specified within the Boolean formula. 

The value of Boolean constants, variables, and functions has been 
described in other subsections. The value of a Boolean formula in pa- 
rentheses is simply the value of the enclosed Boolean formula. 

The value of a complex Boolean primary is interpreted as: 

-+n)on,0n3... =... (n, on, AND n,on3). e3 
where n is a numeric (or literal) formula and o is a relational 


operator. 


The value of a complex Boolean secondary is interpreted as: 
...- NOT NOT p... =...NOT (NOT p)... 


where p is a Boolean primary. 


The value of a complex Boolean term is interpreted as: 
..s AND s AND s...=...(s AND s) AND s.. 


where s is a Boolean secondary. 


The value of a complex Boolean formula is interpreted as: 
awit ORC OR, tiws 3 4444t OR* t). (OR: tess 


where t is a Boolean term. 

The Boolean formula t OR t, where t is a Boolean term, yields 
the value false if both t's are false, and otherwise yields the value true. 
The Boolean term s AND s, where s isa Boolean secondary, yields 
the value true if both s's are true, and otherwise yields the value false. 
The Boolean secondary NOT p, where p isa Boolean primary, yields 
the value true if p is false, and the value false if p is true. 


The meaning of the relational operators is as follows: 
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EQ Equal to 


NQ Not equal to 

GR Greater than 

LS Less than 

GQ Greater than or equal to 
LQ Less than or equal to 


The constructions given in this subsection also indicate the order 
in which the operations are carried out. Thus: 

a. A numeric formula is evaluated before any Boolean 
primary of which it is a part is evaluated. 

b. A Boolean primary is evaluated before any Boolean 
secondary of which it is a part is evaluated. 

c. A Boolean secondaryis evaluated before any Boolean 
term of which it is a part is evaluated. 

d. A Boolean term is evaluated before any Boolean for- 
mula of which it is a part is evaluated. 

No other ordering of operations is implied by the foregoing con- 
structions, aside from that given in the interpretations above. 

Thus, if a function occurring in a Boolean formula has side ef- 
fects involving other quantities in the formula, the value of the Boolean 
formula is not defined. Furthermore, only enough operations are eval- 
uated to establish the truth value of the formula. 

The value resulting from the evaluation of a relation is determined 
by comparing the two values involved. These comparisons are made in 
the following manner: . 

a. For numeric formulas: algebraically. 

b. For literal formulas: by considering both values as un- 
signed integer values of unlimited magnitude. If the 
values are of unequal size, the shorter is considered 
to be prefixed with enough of the following signs to 
match the size of the longer value: 

(1) Hollerith formula: prefix Hollerith blanks. 
(2) Transmission formula: prefix transmission 
blanks. 
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The result of a comparison between literal values of 
different types is not defined. Comparison of two octal 
numbers is made algebraically. 

For status variables and formulas: by numerically com- 
paring the unsigned integer values which each represents. 
The status formula must yield a value representing an 
unsigned integer value which is a value also represent- 


able by the status variable. 
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G. Literal and Status Formulas 


is Construction 


transmission formula: | 
| 
status formula: | | 


2. Meaning 
A literal formula serves to identify a literal value. A status 
formula serves to identify a status value. A status constant has meaning 
only if it appears in context with a variable for which it is a declared 
value. Such context may be provided in a status relation, status assign- 


ment statement, or item switch declaration. 


BIE=6OO,SERLES$ @§£$ $$ is 


IV. SIMPLE STATEMENTS 


As Assignment Statements 


Ls Construction 


assignment statement: | 
| | 
| 
| 
numeric assignment statement: = 
$ 
Boolean assignment statement: = 
$ 
literal assignment statement: = 
: 
status assignment statement: = 
$ 


entry assignment statement: see subsection IV.C, Entry 


Operations 


ce Meaning 


An assignment statement serves to specify the assignment 
of a value to a variable. 
The type, precision, and/or structure of the value may be altered 
upon being assigned to the variable according to the following rules: 
a. For numeric assignment statements: 
(1) A floating value assigned to a floating variable 


remains unaltered. 
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(2) 


(3) 


(4) 


(5) 


(6) 


(7) 


(8) 


A fixed or integer value assigned to a floating 
variable will be converted to a floating value 
with the precision of a floating value. 

A floating value assigned to a fixed or integer 
variable will be converted to a fixed or integer 
value, respectively, with the precision of the 
variable. 

A fixed or integer value assigned to a fixed or 
integer variable will be converted to the pre- 
cision of the variable. 

Least significant bits lost due to a change in the 
precision of a value are truncated or rounded as 
indicated by the declaration pertaining to the 
variable. 

Least significant bits added due to such a change 
are zero valued. 

The magnitude of the actual value must not ex- 
ceed the maximum permitted by the declaration 
pertaining to the variable. 

A negative value must not be assigned to a vari- 


able declared to be unsigned. 


For literal values: 


(1) 


(2) 


A literal value assigned to a literal variable 
which is shorter than the size of the value will 
cause the excess bytes to be truncated from the 
left end of the value. 

A literal value assigned to a literal variable 
which is longer than the size of the value will 
cause sufficient bytes to be prefixed to the value 
to match the size of the variable. If the vari- 
able is Hollerith, Hollerith blanks will be pre- 
fixed; if the variable is transmission, trans- 


mission blanks will be prefixed. 


JOVIAL 


(3) A literal value must not be assigned to a literal 
variable of a different type. 
c. For status values: The value assigned must represent 
an unsigned integer value which is also a value repre- 


sentable by the variable. 
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B. Exchange Statements 


or Construction 


exchange statement: [numeric exchange statement | | 
| 
: 
| 
numeric exchange statement: [numeric variable | == 
$ 
Boolean exchange statement: == 
$ 
literal exchange statement: == 
§ 
status exchange statement: [status variable | == 
$ 


entry exchange statement: see next subsection, Entry 


Operations 


2. Meaning 
An exchange statement serves to specify the assignment of 
the value of two variables to each other. 
The effect of an exchange statement may be expressed in terms of 
simpler statements. The exchange statement a == b$ has the effect of 


being replaced during execution by 


t = a$ 
a= b$ 
b = t$ 


where a and b are variables and t is an implicit variable of the same 


type and structure as a. 
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Cc. Entry Operations 


1. Construction 


entry relation: tEQ# | entry formula | | 
eNQs 

entry assignment statement: = 

entry exchange statement: == 


$ 
entry formula: |o 


entry variable: ENTRY ([table designation |($ $) ) | 
ENT (| table designation ($ [ subscript] $) ) 


Z. Meaning 


An entry variable (which is not otherwise considered a vari- 
able) serves to identify the agglomerated bit string derived by consider- 
ing an entire entry of the designated table as a single quantity. The 
structure of the quantity is obviously dependent on the structure and re- 
lationships of the individual table items comprising an entry. The spe- 
cific entry designated in the table is the one whose items are associated 
with the value of the subscript. 

An entry formula (which is not otherwise considered a formula) 
serves to identify the agglomerated value specified by an entry variable, 
or else a single zero bit. 
| The value resulting from the evaluation of an entry relation (true 
or false) is determined by comparing the value of the entry variable and 
the value of the entry formula, considering each value to be an unsigned 
integer value of unlimited magnitude. 

The assignment of the value of an entry formula to an entry varia- 


ble is made by considering the value to be an unsigned integer value and 
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the variable to be an unsigned integer variable, except that if the 
magnitude of the actual value exceeds the maximum indicated by the 
entry variable, excess bits are truncated from the left of the value. 
The effect of an entry exchange statement may be expressed in 
terms of entry assignment statements in a manner analogous to the ex- 


pression of other exchange statements in terms of other assignment 
statements. 
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D. Goto Statements 


1 Construction 


goto statement: GOTO# 

sequence designation: [statement name| | | 
s 5) | 
($ $) | 


ae Meaning 


A goto statement serves to specify an interruption in the 
normal sequence in which operations are executed (i.e., the sequence 
in which they are written). 

When a statement name follows the GOTO, the statement with 
that name prefixed to it is the next statement to be executed. When a 
close name follows the GOTO, the goto statement invokes the execution 
of the close declaration which defines that name (see subsection VII.B, 
Close Declarations). When a switch name follows the GOTO, the goto 
statement invokes the execution of the switch declaration which defines 


that name (see subsection VII.A, Switch Declarations). 
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E. Procedure Statements 


be Construction 


procedure statement: 
( factual parameter list]) $ | $ 


actual parameter list: | actual input parameter list 


actual output parameter list 
actual input parameter list: | actual input parameter 


| i 
actual output parameter list: = 
| . [BetuaT output parameter] || # 
actual input parameter: | | 
actual output parameter: ee | variable | | [array name | 
formula: | | 
| 


Ze Meaning 


A procedure statement serves to invoke the execution of the 
procedure declaration which defines that name (see subsection VII.D, 
Procedure Declarations). 


An actual input parameter must not be a status constant. 
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F. Stop Statements 
‘= Construction 


stop statement: STOP $ 


2. Meaning 


A stop statement serves to specify the operational end of a 


program. 
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G: Compound Statements 


Ls Construction 


compound statement: BEGIN# END¢ | 
sentence list: | | | [sentence] | 
sentence: [statement] | 
statement: | 
simple statement: | 

| | 

| | 

| Game]. (Simple statement] 

| | | 

| | 
complex statement: | | 
declaration: | [process declaration] | 

| 
data declaration: | 

| [aeray declaration] | 

| 
table declaration: | 

| 
process declaration: | | 

| 
switch declaration: | 
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Ze Meaning 


A compound statement serves to specify a set of statements 
to be employed as a simple statement. At least one statement must be 
included within a compound statement; any number of declarations also 
may be included, but no special significance is attached to the fact that 
they are included. Adirect statement is considereda compound statement. 

The appearance of a name prefixed to a simple or complex state- 
ment serves to define the name as a statement name, and the following 
statement as the entity to which the name refers. 

A statement name defined within a for statement must not be ref- 


erenced from outside that for statement. 
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V. COMPLEX STATEMENTS 


A. If Statements 


lz Construction 


if statement: simple statement 
if clause: IF# |Boolean formula } $ 


Le Meaning 


An if statement serves to specify the conditional execution of 

a simple statement. 
The effect of an if statement is as follows: if the value of the 
Boolean formula is true, the simple statement is executed; if the value 
of the Boolean formula is false, the simple statement is ignored. The 


next statement in sequence following the if statement is then executed. 
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B. Ifeither Statements 


de Construction 


ifeither statement: 
| 
Ee 

ifeither clause: IFEITH# | Boolean formula | $ 

orif clause: | [pame].| ORIF# [Boolean formula |$ 


2. Meaning 


The ifeither statement serves to specify the conditional ex- 
ecution of one of several simple statements. 
The effect of an ifeither statement may be defined in terms of sim- 


pler statements. The statement 


IFEITH b0O$ sO 
nl. ORIF bl$ sl 
n2. ORIF b2$ s2 

tt es Gs. Set gent END 


where b0, bi, and b2 are Boolean formulas, s0, sl, and s2 are 
simple statements, and nl and n2 are statement names, has the ef- 


fect of being replaced during execution by 


IF b0O$ BEGIN sO GOTO nn$ END 
nl. IF bl$ BEGIN sl GOTO nn$ END 
nz. IF b2$ BEGIN s2 GOTO nn$ END 


eo e@e ee e © @ e e@ @ 


nn. 


where nn is the (possibly implicit) name of the statement following the 


ifeither statement. 
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oF For Statements 


l. Construction 


for statement: | 
[two-factor for statement | | [three-factor for statement | 
one-factor for statement: 
two-factor for statement: | [incomplete for clause] | 
| incomplete for clause | 
three-factor for statement: | [one-factor for clause] | 
| incomplete for clause ]| 
incomplete for clause: | 
one-factor for clause: | [name] , FOR# [index | = 
$ 
two-factor for clause: |[name].| FOR# - 
fiieial vale] $ 
three-factor for clause: | [name] ‘ FOR# 7 
finitial value], ) $ 
all clause: |[name].| FOR# = ALL 
( (fable designation] ) § 
initial value: 
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step value: 
terminal value: 
subordinate statement: | 
for compound: BEGIN# | ; | 
END# 


2. Meaning 
A for statement serves to specify the iterative execution of 
a simple statement. 

The effect of a for statement may be defined in terms of sim- 
pler statements. In the following discussion, nO, nl, né2, etc., are 
statement names; v0, vl, v2, etc., are indexes; f0, fl, f2, etc., 
are initial values (numeric formulas); i0, il, i2, etc., are step val- 
ues (numeric formulas); tO, tl, t2, etc., are terminal values (nu- 
meric formulas); s is a simple statement; and ss is a subordinate 
statement. 


The one-factor for statement 


FOR v0 = f0$ 
nl. FOR vl = f1$ 
n2. FOR v2 = f2$ 


has the effect of being replaced during execution by 


vO = f£0$ 
nl. vl = f1$ 
n2. v2= £2$ 
s 


In other words, the indexes are assigned initial values in the order of 


their appearance in for clauses, and the simple statement executed once. 


The two-factor for statement 


nl, FOR vl = fl$ 
n2. FOR v2 = f2, i2$ 
n3. FOR v3 = £3$ 


oe e@ ee e @ @ @ 


ae: v3 = £3$ 

a re cede 
v2 = v2 + i2$ 
vO = vO + i0$ 
GOTO nm$ 


where nm is the (possibly implicit) name of the subordinate statement. 

In other words, the indexes are assigned initial values in the order 
of their appearance in for clauses; the subordinate statement is executed; 
indexes appearing in two-factor for clauses are increased by their step 
values (possibly negative) in reverse order of their appearance in for 
clauses; and the latter two operations are performed iteratively. 


The three-factor for statement 


nl. FOR vl = fl, il, t1$ 
n2. FOR v2 = £2$ 
n3. FOR v3 = f3, i3$ 


has the effect of being replaced during execution by 
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n2. v2 
Has. ov 
nm. IF il GR O AND vl GR tl 
OR il LS O AND vl LS tl$ 
GOTO nn$ 
ss 


nl. vl = £fl1$ 


nn. 


where nm is an implicit statement name and nn is the (possibly implicit) 
name of the statement following the for statement. 

In other words, the indexes are assigned initial values in the order 
of their appearance infor clauses; the indexof thethree-factor for clause 
is examined to see if it has exceeded the current terminal value (exceed- 
ing meaning in the direction of the current sign of the step value); the 
subordinate statement is executed; indexes appearing in two- and three- 
factor for clauses are increased by their step values (possibly negative) 
in reverse order of their appearance in for clauses; and the latter three 
operations are performed iteratively until the above test is met. If the 
test is met before the first execution of the subordinate statement, the 
statement is not executed at all. 


The all clause 
FOR v = ALL(a)$ 


where a is a table designation and v is an index, has the effect of being 


replaced during execution by 
FOR v = 0, 1, NENT(a) - 1$ 


Thus, the all clause may be considered a special form of a three-factor 
for clause. 


2E-600 SERIES JOA 


The for compound 
BEGIN sl nl. IF bl$ END 


where sl isa sentence list, has the effect of being replaced during ex- 


ecution by 


BEGIN 
sl 
nl. IF NOT (bl1)$ GOTO nn$ 
END 


where nn is the (possibly implicit) name of the statement following the 
for statement. 

The programmer should note that maximum optimization of two- 
and three-factor clauses is obtained only if the step and terminal values 
are both numeric formulas containing only numeric constants. 

More than one three-factor for clause may actually appear in a 
three-factor for statement, but those other than the first are considered 
to be stripped of their terminal value and, in effect, to be two-factor for 
clauses. 

All statement names ina for statement, except those prefixed to 
the first for clause, are considered to be within the for statement as far 


as their scope is concerned (see subsection VIII.B, Scope of Definitions). 


Te) 


[Ee 


(Sp) 
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D. Test Statements 


lL. Construction 
test statement: TEST $ | TEST# [index | $ 


dis Meaning 


A test statement serves to specify an interruption in the 
normal sequence of operations within a for statement. The test state - 
ment must only appear within a two- or three-factor for statement. 

The effect of a test statement which does not designate an index 
is that of a goto statement whose successor is the first implicit state- 
ment (executed by the innermost for statement containing the test state- 
ment) that increments an index. 

The effect of a test statement which does designate an index is 
that of a goto statement whose successor is the implicit statement (ex- 
ecuted by a for statement containing the test statement) that incre- 
ments that index; if the index was defined in a one-factor for clause, 
the successor is the implicit statement which follows the point at which 
an implicit incrementing statement would have appeared if that index 


were defined in a two- or three-factor for clause. 


VI. DATA DECLARATIONS 


A. Item Descriptions 


Li Construction 


item description: [numeric item description | | 

numeric item description: | 

integer item description: I# # # 4 
| ad [ES] + (aa + + Fane] 

fixed item description: Af # # # 

floating item description: F# # 

Boolean item description: B 

literal item description: | 

Hollerith item description: H# 

transmission item description: T# 

status item description: S# #[status constant list | | 
sé 

status constant list: | # | 

size: 

signing: s|u 


rounding: R| # 


range: [famerie constant]... [Ramerie constant ]| + 
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2. Meaning 


Item descriptions are a part of data declarations which specify 
various characteristics of the quantities declared. 

The integer item description serves to define a quantity which may 
contain only integer values. The size specifies the number of bits of 
which the quantity is composed, from | to 71 (if unsigned) or from 1 
to 72 (if signed). The signing, if an S, specifies that the high-order bit 
is to represent the sign of the quantity; ifa U, all bits are used for the 
magnitude and the quantity is considered an unsigned (i. e., implicitly pos- 
itive) quantity. The rounding, ifan R, specifies that any value assigned 
to it is to be rounded if the precision of the value exceeds that of the quan- 
tity; if no R is present, such a value will be teuncated: The range, if 
present, specifies the minimum and maximum magnitude of any value 
which may be assigned to the quantity; however, the range is not used by 
the compiler. 

The fixed item description serves to define a quantity which may 
contain only fixed values. The size, signing, rounding, and range are as 
noted above for integer quantities. The precision specifies the position 
of the binary point relative to the low-order bit of the quantity; if the pre- 
cision is positive, it specifies the number of positions to the left, and if 
negative, the number to the right. 

The floating item description serves to define a quantity which may 
contain only floating values. Rounding and range are as noted for integer 
quantities. The implied size is one word. 

The Boolean item description serves to define a quantity which may 
contain only Boolean values. The implied size is one bit. 

The Hollerith item description serves to define a quantity which may 
contain only Hollerith values. The size specifies the number of six-bit 


bytes of which the quantity is composed. 
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Thetransmission item description serves todefine a quantity which 
may contain only transmission values. The size specifies the number of 
six-bit bytes of which the quantity is composed. 

The status item description serves to define a quantity which may 
contain only status values. The status constant list specifies some or all 
of the values of the quantity. Thefirst status constant written willrepre- 
sent the unsigned integer value 0; the second, 1; the third, 2; and so 
forth. The size, if given, specifies the number of bits of which the quan- 
tity is composed; in this case, the number of status constants written 
must not exceed 2", where n is the size given. If the size is not given, 


it will be determined as n by ae <m < 2", where m is the number 
of written status constants. The size of a status quantity must not exceed 


71 bits. 
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B. Simple Item Declarations 


As Construction 


simple item description: ITEM# # 
fem description] $ | res [fame] 
st 7 
rreM# [name] # : 
| 
signed numeric constant: + | 
| 


2. Meaning 


The simple item declaration serves to define a quantity as a 
simple item with the given name and characteristics. 
The preset value specifies the initial value of the quantity. The ef- 


fect of specifying a preset value is that of an assignment statement 
vy ses 


written immediately after the declaration, where v is the simple item 
name and c is the preset value. 

If no item description is given, the quantity is specified to be of the 
same type as the preset value, and of the size required to hold the value. 
The quantity is signed ifa + or - is shown and unsigned otherwise; is 
unrounded; and if fixed, has a precision equal to that of the preset value. 
Also, the preset value must not be a status constant nor a Boolean 0 or 1 
if no item description is given. 

A simple item declaration must precede the first reference to the 


simple item. 


3E-600 SERIES — sour 


Ge Mode Declarations 


l. Construction 


mode declaration: MODE# [item description | $ | MODE# 
$ | MODEY Py 


2. Meaning 


The mode declaration serves to define otherwise undefined 

quantities as simple items with given characteristics. 

A mode declaration defines a name which appears in a main pro- 
gram (a program excluding its procedures) used as a simple item name 
only if: 

a. It has not beendeclared previously inthe main program 
in a simple item, array, table, file, or procedure 
declaration; 

b. It is not defined in the COMPOOL as a simple item, 
array, table, or table item; 

rom The first appearance of the name follows the appear- 
ance of this mode declaration; and 

d. No other mode declaration in the main program or in 
any procedure appears between this mode declaration 
and the first appearance of the name. 

A mode declaration defines a name which appears in a procedure 
used as a simple item name only if: 

a. It has not been declared previously in the main program 
or in this procedure in a simple item, array, table, 
file, mode, or procedure declaration; 

b. It is not defined in the COMPOOL as a simple item, 
array, table, or table item; 

rom The first appearance of the name follows the appear- 


ance of this mode declaration; and 
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d. No other mode declaration in the main program or in 
any procedure appears between this mode declaration 
and the first appearance of the name. 

When a name appears in the above-described context (except that 
no mode declaration precedes its first appearance), an implicit mode 


declaration of the form 
MODE I 36 S$ 


is assumed to exist as the first sentence in the program. 


Preset values aretreatedas specified for simple item declarations. 
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D. Array Declarations 


l. Construction 


array declaration: ARRAY# # [dimension list] # 

$ | ARRAYS [Ramd] # 

: 
dimension list: | it [dimension] | 


dimension: | number 
preset description: BEGIN# [preset list] END# 


preset list: | [preset description] # | | | [preset value] #| 


oe Meaning 


The array declaration serves to define an n-dimensional 
arrangement of quantities, each quantity with the given name and 
characteristics. 

The dimensionality of the array is specified by the dimension list. 
The number of dimensions in the array is the number of dimensions 
written. The size of each dimension is given as the number written for 
each dimension. This number must be nonzero. Thus, the array is 
rectangular. The arrangement of quantities in the array can be illus- 


trated by the following example. 


/0,0,.2. 0,1, 2 | 0,.2,2 


where the list of numbers in a cell (i,j,k) represents the values of sub- 


scripts in the subscript list of a variable naming this three-dimensional 


SE*GOO SERIES 


array. The row number is indicated by i, the column number by 
j., and the matrix number by k. Each of the dimensions has a size 
of three. Note that the first element in a dimension is numbered 
zero. The illustration may be extended in the obvious manner for 
any Other array. Any number and size of dimensions (except zero) 
is permissible. | 

Arrays are stored column by column in internal storage, e.g., 
(0,0, 0), (1,0, 0), (2,0,0), (0,1, 0), (1,1,0), ..., (2,2,0), (0,0, 1), 
(13.051), aces (hy 23.2)5- (225.2) 

The preset description, if present, specifies initial values for 
quantities in the array. To determine the correspondence between in- 
- dividual quantities and preset values, consider the following example 


for the three-dimensional array illustrated above: 


BEGIN BEGIN BEGIN 


END 
BEGIN END 
BEGIN END END 
BEGIN BEGIN END 
BEGIN BEGIN END 
BEGIN END END END 


In this example the preset values have been replaced by the 
subscript list for the corresponding quantity. Written preset values 
are paired with the quantities indicated from left to right within in- 
nermost BEGIN END brackets, and each preset value is assigned 
to its paired quantity in the manner specified for simple items. Not 
all quantities need to have paired values; values may be missing 
from the right within innermost BEGIN END brackets. However, 
all brackets necessary to indicate the dimensions of the array must 


be present. 
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The correspondence illustrated above may be extended for ar- 
rays with more thanthree dimensions, and for arrays with twodimen- 
sions. For one-dimensionalarrays, the single BEGIN END brackets 
enclose all preset values even though in this case they each corres- 
pond to elements of different rows. 

The array declaration must precede the first reference to the 


array. 
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E. Independent Overlay Declarations 


hs Construction 


independent overlay declaration: OVERLAY# 


independent data sequence list: 
independent data sequence: 
. | 


independent data: | [aeray name] | 
| table name | 


2. Meaning 
The independent overlay declaration serves to specify se- 
quences in which simple items, arrays, and tables are to be arranged 
in internal storage; to specify overlaying of such sequences. 

Within an independent data sequence, independent data are as- 
signed to sequential addresses in the order written. Within an inde- 
pendent data sequence list, each independent data sequence begins at 
the same address. 

A name must not appear more than once in a given independent 
overlay declaration, but may appear in more than one such declaration 
if the effect is logically consistent. For overlay purposes, a simple 
item begins with the first word containing it, an array begins with the 
first word containing it, and a table begins with its nent word. The 
meaning of values assigned to overlaid data (whether by assignment 
statements, preset values, etc.) may be determined only by the pro- 


grammer, and it is his responsibility to avoid inconsistencies. 
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F. Ordinary Table Declarations 


l. Construction 


ordinary table declaration: TABLE# [naming | # # 
+ [aCKRg] s 

naming: | 

length: V# | R# | number | 


structure: S| P| # 


packing: D| M| N| # 


ordinary entry description: BEGIN# ARS aaa 
ordinary entry declaration: Tce meee | 
ordinary table item declaration: ITEM# # 
(tem description] | 1TEMs [name] ¢ [em description] $ 
BEGIN¢ | [preset value]# | END# 
dependent overlay declaration: OVERLAY# 
dependent data sequence list: 
\- | 
dependent data sequence: | ; | 


Z. Meaning 
The ordinary table declaration serves to define a two- 
dimensional arrangement of quantities. Ina serial table, all quantities 
in a column are defined as a single entry and all quantities in a row are 
defined as instances ofa table item. Ina parallel table, the reverse is 


true. 
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Thus, atable item is a vector of quantities each with the same 
name and characteristics, and an entry is composed of one instance of 
each item. 

An ordinary table declaration defines a table in which the compiler, 
not the programmer, specifies the exact positioning of each quantity within 
anentry. The table may or may not be named. 

The table may be of variable or rigid length, the former indicated 
by V andthe latter by R. A rigid table has a fixed numberof entries 
given by the number following the R. A variable table has a variable 
number of entries, with the maximum number of entries given by the 
number following the V. Both kinds of tables are prefixed in storage 
with a word which ina rigid table yields a value equal to the fixed num- 
ber of entries, and which in a variable table yields or is assigneda value 
equal to the current number of entries. This word is the nent word. 

The table is structured in serial or in parallel, the former indi- 
cated by S ‘and the latter by P. If no structure is specified, parallel 
is assumed. Tables, like arrays, are stored "column by column"; thus, 
serial tables are stored "entry after entry" and paralleltables are stored 
"all instances of a table item after all instances of a table item." (An 
exception to the latter is that each word will be stored as a column for 
multiword items.) Variable tables must be structured in serial. 

The table items making up an entry may or may not be "packed." 
If an N or no packing is specified, each table item is stored beginning 
in a different word. If an M or D is specified, the table items are 
stored in order to minimize unused bits. If further knowledge of the exact 
allocation of table items within an entry is required, the programmer is 
advised to use the specified table declaration. 

The ordinary entry description specifies the composition of anentry 
in terms of its table items, via ordinary entry declarations. 

The ordinary table item declaration defines a table item as a set of 
quantities each with given name and characteristics. The preset val- 
ues, if given, specify initial values for these quantities. The first 


value is assigned to the first instance of the table item; the second value, 
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to the second instance; and so forth, in the manner specified for simple 
items. Not all instances need corresponding preset values. 

The dependent overlay declaration specifies sequences in which the 
table items are arranged within an entry, and specifies overlaying of 
such sequences. If N or no packing is specified for the table, the table 
items appearing in a given dependent data sequence are arranged in the 
order written; and within a givendependent data sequence list, each de- 
pendent data sequence begins at the same address for a givenentry. If 
M or D packing is specified for the table, the effect is to begin de- 
pendent data sequences within a given dependent data sequence list at 
the same address for a given entry; the order within a dependent data 
sequence is not defined. 

A table item name must not appear more than once in a given de- 
pendent overlay declaration, but mayappear in more than one such dec- 
laration if the effect is logically consistent. A table item must appear 
in an ordinary table item declaration before it may appear in adependent 
overlay declaration. 

The meaning of values assigned to overlaid table items (whether by 
assignment statements, preset values, etc.) maybe determined onlyby the 
programmer, andit ishis responsibility to avoid logical inconsistencies. 

The table declaration must precede the first reference to the table 


or table items. 
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G: Specified Table Declarations 


1. Construction 


specified table declaration: TABLE# # # 
# $| specified entry description 
width: 


specified entry description: BEGIN# 


specified table item declaration 
| specified table item declaration | END# 


specified table item declaration: ITEM# # 


[tem description] # [position]$ | 1rEM¢ [mame] # 
[item description] # [position]$ BEGINY 
| + | ENDE 

position: [word] # [bit] 

word: 


2. Meaning 


The specified table declaration serves to define a two- 
dimensional arrangement of quantities similar to that defined by the 
ordinary table declaration. In the specified table declaration the pro- 
grammer, not the compiler, specifies the exact positioning of each 
quantity within an entry. 

The naming, length, and structure of a specified table are as 
noted for ordinary tables in the preceding subsection. The width spe- 
cifies the number of words in an entry; this is the actual width of an 
entry regardless of the positioning of individual table items. 

The specified entry description specifies the composition of an 


entry interms of its table items and gives the exact position of each table 
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item within the entry. Dependent overlay declarations are nota part of 
the specified entry description, since the programmer may accomplish 
such positioning explicitly. 

The specified table item declaration defines a table item as a set 
of quantities, each with given name and characteristics. The preset 
values are specified as noted for ordinary table item declarations in the 
preceding subsection. 

The position given in the specified table item declaration specifies 
the word of the entry and the bit of the word in which the table item be- 
gins. The first wordof an entry is indicated by 0; the second, by 1; and 
soforth. The first bit of a word is indicated by 0; the second, by 1; and 
soforth. (Table items with a size less than or equal to 36 bits must not 
be positioned in more than one word; and those with a size greater than 
36 bits, but less than or equal to 72 bits, must not be positioned in more 
than two words, etc.) If the packing is given, it is not used by the com- 
piler but may be used by the programmer to describe the situation re- 
sulting from his positioning of the item. 

If the table is of serial structure, it is permissible to position 
table items beyond the end of the entry (as specified by the width). This 
will cause the position of such a table item to extend into the next entry, 
thereby overlaying the initial table items of the next entry. Such a table 


item, however, is referenced as if it were a part of the current entry. 
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H. Like Table Declarations 


1. Construction 


like table declaration: TABLE# 4 # 
+ [packing] # L$ | TABLE fname] # [Structure] # 
#us 


2. Meaning 
The like table declaration serves to define a table which is 

like a previously declared table (ordinary or specified). The previously 
declared table (the pattern table) may be declared at any point earlier in 
the program where tables may be declared, 

The name of the like table must be identical to the name of the 
pattern table except for a suffixed letter or numeral. The table defined 

' by the like table declaration is then identical in composition to the pat- 

tern table except that any length, structure, or packing specified in the 
like table declaration overrides that given in the pattern table declara- 
tion, and except that no preset values are assigned to the like table. 

The names of the table items in the like table are identical to 
the names of the table items in the pattern table except that the letter 


or numeral noted above is suffixed to each table item name. 
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VII PROCESS DECLARATIONS 


A. Switch Declarations 


Le Construction 


index switch declaration: SWITCH# ae ( ) $ 
index switch list . | 
index switch element: | + 
item switch declaration: SWITCH# ( ee 

. )s 
sritch tem: | | 
item switch list i | 
item switch element: = 


file switch declaration: see subsection IX.A, File Declarations 


and Status 


Zz; Meaning 


A switch declaration serves to define a set of operations which 
may be invoked from various points in the program by goto statements. 
The effect of an index switch declaration may be defined in terms of sim- 


pler statements. The declaration 
SWITCH x = (,el,,e2,e3,)$ 


where x is an index switch name and el, e@, and e3 are sequence des- 


ignations, when invoked by the statement 


GOTO x($n$)$ 
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where n is a numeric formula, has the effect of replacing the goto state- 


ment during execution by the compound statement 


BEGIN 
IF f(n) EQ 0$ GOTO e$ 
IF f(n) EQ 1$ GOTO el$ 
IF f(n) EQ 2$ GOTO e$ 
IF f(n) EQ 3$ GOTO e2$ 
IF f(n) EQ 4$ GOTO e3$ 
IF f(n) EQ 5$ GOTO e$ 
END 


where f is a procedure name that designates an implicit function yield- 
ing the integer value of the actual parameter (by truncation if necessary), 
and e is the (possibly implicit) name of the statement following the orig- 
inal goto statement. 

In other words, the value of the numeric formula selects one of the 
switch elements according to the position of the element on the list. A 
value of 0 selects the first element; 1, the second; and so forth. When 
an element is missing, the goto statement has no effect. The value must 
be one which corresponds to a position in the list. 

The effect of an item switch declaration can be defined in terms of 


simpler statements. The declaration 
SWITCH x(y) = (v0 = e0, vl = el, v2 = e2)$ 


where x is an item switch name; y is a simple item name; v0, vl, 


and v2 are preset values; and e0, el , and e2 are sequence designa- 


tions, when invoked by the statement 
GOTO x$ 


has the effect of replacing the goto statement during execution by the 


compound statement 
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BEGIN 
IF y EQ v0O$ GOTO e0$ 
IF y EQ vl1$ GOTO el$ 
IF y EQ v2$ GOTO e2$ 

END 


If y is an array name or a table item name and the switch is invoked by 


the statement 
GOTO x($n$)$ 


where n is a subscript (for a table item) or a subscript list (for an 


array), the replacement is 


BEGIN 
IF y($n$) EQ v0$ GOTO e0$ 
IF y($n$) EQ vl$ GOTO el$ 
IF y($n$) EQ v2$ GOTO e2$ 

END 


In other words, the value of the quantity y selects one of the se- 
quence designators according to a match with the corresponding preset 
value. If the value of the quantity does not match any of the preset val- 
ues, the goto statement has no effect. 

In either the item or index switch declaration, sequence designa- 
tions which reference other switch designations are understood to cause 


further effective replacements as required. 


A switch declaration defined within a for statement must not be 


invoked by a goto statement outside that for statement. 
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B. Close Declarations 


be Construction 
close declaration: CLOSE# $ BEGIN# 
END# 


2. Meaning 


A close declaration serves to define a set of operations that 
may be invoked from various points in the program by goto statements. 
The effect of a close declaration, when invoked by a goto statement, is 
to replace the goto statement during execution by the sentence list given 
in the close declaration, enclosed in its BEGIN END brackets. 

Close declarations must be placed in a program so that they may 
only be reached by the invoking goto statements. No close declaration 
may contain a statement which directly or indirectly invokes it (i.e., no 
recursion). 

A close declaration defined within a for statement must not be in- 
voked by a goto statement outside that for statement, nor by a goto 


statement in a procedure not containing that close declaration. 
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CG. Return Statements 


Is Construction 


return statement: RETURN $ 


2. Meaning 


The return statement must only appear within the sentence 
list of a close declaration or a procedure declaration. The effect of a 
return statement is to designate the statement following the invoking 
goto statement (for a close declaration) as the next statement to be ex- 
ecuted, or to designate a particular implicit statement (for a procedure 


declaration) asthenext statement tobe executed (see the next subsection). 
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D: Procedure Declarations 


I Construction 


procedure declaration: 
procedure heading: PROC# [name | ( [formal parameter list ]) 
$ | PROC# [name ]$ 


formal parameter list: | formal input parameter list 
formal output parameter list 


formal input parameter list: 
| . [formal input parameter] || # 

formal output parameter list: = 
| » | # 

formal input parameter: | | 
| [ose mame]. 

formal output parameter: | [array name || 
| (statement name]. 

declaration list: | | 

procedure body: BEGIN# [sentence list JEND# 


2. Meaning 


A procedure declaration serves to define a set of operations 
that may be invoked from various points in a program by procedure state- 
ments or functions. 

The effect of a procedure declaration can be defined in terms of 


simpler statements. The declaration 


PROC p(fl, £2, £3, £4. = £5, £6, £7,{8.)$ d 
BEGIN s END 
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where p is a procedure name; fl and f£5 are simple item 
names; f2 and f6 are array names; f3 and f7 are table 
names; f4 is a close name; f8 is a statement name; d isa 
declaration list including declarations for fl, f2, f3, f5, 
f6 , and £7; and s isa sentence list 


when invoked by the procedure statement 


p(al,a2,a3,a4. = a5,a6, a7, a8.)$ 


where al is aformula, a5 is avariable, a2 and a6 are 
array names, a3 and a7 are table names, a4 is aclose 
name, and a8 is a statement name 


has the effect of replacing the procedure statement during execution by 


the compound statement 


BEGIN 
d 
fl = al$ 
OVERLAY f2 = a2$ 
OVERLAY f3 = 
OVERLAY f6 = a6$ 
OVERLAY f7 = 


s 
GOTO x$ 
CLOSE f4$ BEGIN GOTO a4$ END 
£8. a5 = £5$ 
GOTO a8$ 
Pe a5 = £5$ 
END 
where x is the implicit name of the statement which any re- 
turn statement in s is understood to reference. Any sub- 


script list in a5 is understood to be evaluated before such 
replacement takes effect. 


In other words, the following operations are performed when a pro- 
cedure declaration is invoked by a procedure statement: 
a. Simple item formal input parameters are assigned the 
values of corresponding formula actualinput parameters. 
b. Array andtable formal parameters are considered to be over- 


laid with corresponding array andtable actual parameters. 
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ee Close and statement name formal parameters are con- 
sidered to be identical with corresponding close and 
statement name actual parameters. 

d. The subscripts (if any) of variable actual output param- 
eters are evaluated. 

e. The procedure body is executed. 

f. Variable actual output parameters are assigned the 
values of corresponding simple item formal output pa- 
rameters. This operation is performed only if the 
procedure body is exited via a return statement, by 
normal statement sequencing, or via a formal output 
parameter that is a statement name. 

Thus, each formal parameter must correspond to an actual param- 


eter (and vice versa) by their position in the parameter lists as follows: 


a. Formal input simple items to actual input formulas. 
b. Formal output simple items toactual output variables. 
fone Formal tables to actual tables. 

d. Formal arrays to actual arrays. 

e. Formal close names to actual close names. 

f. Formal statement names to actual statement names. 


In addition, the declaration list must contain declarations for all 
formal simple item, array, and table names. The declaration list and 
procedure body of a procedure declaration must not contain any proce- 
dure declaration. The procedure bodymust not containa statement which 
directly or indirectly invokes this procedure declaration (i.e., no 
recursion). 

The effect of a procedure declaration when invoked bya function is 
similar to when it is invoked by a procedure statement, except that the 
declaration list must include a simple item declaration for the proce- 
dure name, and the simple item must be assigned a value within the pro- 
cedure; that value is then the value of the function that invoked the pro- 
cedure declaration. 

Procedure declarations must be placedin a program such that they 


may be reached only by the invoking procedure statement or function. 
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VIII. PROGRAMS 


Ais Programs 


1, Construction 


program: START} TERM# $ | 
STARTS [sentence Hat] TERM § 


Bis Meaning 


A program serves to define a set of operations that may be 
invoked by the operating system. Ifa statement name is given, it desig- 
nates the first statement in the program to be executed. Ifa statement 
name is not given, the first statement to be executed is the first sequen- 
tial statement in the program. In either case, the first statement exe- 
cuted is not one which is within any declaration. 

Within restrictions given elsewhere in this text (i.e., under direct 
statements), the sign string comprising a program may be written with 
no regard for any particular line format, except that no $ may appear 


in the first column of a line. 
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B. Scope of Definitions--Meaning 


Names are characterized by the scope of their definition. Scope 
of definition refers to the part of the program for which the name is con- 
sidered to be defined and hence may be referenced or invoked. 

There are three basic kinds of scope--local, global, and system. 
A name with local scope is defined over the procedure in which it is de- 
clared. A name with global scope is defined over the main program (the 
program excluding its procedures) in which it is declared, as well as 
over any procedures in which it is not locally defined. A name with sys- 
tem scope(defined in the COMPOOL or library) is defined over all main 
programs in which it is not defined globally, as well as over any pro- 
cedures in which it is neither globally nor locally defined. 

The scope of a name is determined from the point in the program 
at which it is declared, not at any point at which it may be referenced 
or invoked. 

Two identically constructed names are considered to be different 
names if they are declared in different categories. The two categories 
are goto names and set names (see subsection II.E, Names and Indexes). 
Hence, even if their scopes coincide, no confusion can arise. Otherwise, 
the scope of two or more identically constructed names must not coincide. 

Exhibit 2 summarizes the methods by which names may be declared 
and the scope they are consequently given. 

Indexes, like names, are also characterized by their scope of 
definition. The scope of an index includes the for statement which con- 
tains the for clause in which the index appears to the left of the =. This 
scope includes other for statements contained in that for statement but 
does not include procedure declarations contained in that for statement. 

In particular, the scope of an index begins with the above-described 
appearance ina for clause and, thus, may be referenced in the step- and 
terminal-value formulas of that clause as well as in subsequent for clause 
formulas. 

As with names, the scope of two or more identically constructed 
indexes must not coincide. By the very concept of scope, reference to 


a name or index from outside its scope is not defined. 
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EXHIBIT 2 - SCOPE OF NAMES 


Name 


Statement name 


Switch name 


Close name 


Simple item 
name 


Array name 
Table name 
Table item name 
File name 


Procedure name 


Notes: (1) 


Local Scope 


(defined in procedure by) 
(1) 


Prefixing to a statement 
or appearing as formal 
output parameter 

(1) 


Switch declaration 


Close declaration(!) or 
appearing as formal input 
parameter 

(2) 


Simple item declaration 
or mode declaration(3) 


Array declaration'@) 
Table declaration'@) 
Table declaration!) 
File declaration?) 


Global Scope 


(defined in main program by) 


(1) 


Prefixing to a statement 


Switch declar mee 1) 


(1) 


Close declaration 


Simple item dselavation @’ 
or mode declaration(4) 
Array declaration!) 
Table declaration(@) 
Table declaration'#) 
File declaration2) 


Procedure declaration 


innermost for statement containing the definition. 


(2) Definition must precede the first reference to the name. 


System Scope 


(defined in) 


COMPOOL 


COMPOOL 
COMPOOL 
COMPOOL 


Library 


If defined within a for statement, the name must not be referenced from outside the 


(3) If not defined in main program by earlier declaration, nor in COMPOOL, then de- 
fined at first appearance by last previous mode declaration. 


(4) If not defined inmain program or this procedure by earlier declaration (including 
mode), nor in COMPOOL, then defined at first appearance by last previous mode 
declaration. 


Cc. Define Declarations 


l. Construction 


define declaration: DEFINE# | defined identifier 
Z| #["$ 
defined identifier: 


Zs Meaning 


Notwithstanding the remainder of the language, the define dec- 
laration serves todefine an identifier that may stand in place of the string 
of symbols, given within the " brackets, anywhere in the program. 

The string of symbols must not includea comment nora " bracket. 

Any identifier (constructed identically to a defined identifier) that appears 

within a symbol(e.g., within a status constant or comment) is not consid- 

ered to be that defined identifier. Wherever else a defined identifier ap- 

pears in a program (within its scope) it is considered to be replaced by 

_ the string of symbols defined for it before the remainder of the program 
is examined. 

. The scope of a defined identifier extends from its define declaration 
to the next (if any) define declaration in which that defined identifier is 
again defined. 

Thus, for instance, the appearance of the defined identifier, among 
the symbols of another define declaration written within its scope, leads 
to the replacement of the defined identifier at that appearance before that 


other define declaration is effected. 
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IX. FILE OPERATIONS 


Fix File Declarations and Status 


I. Construction 


(Neldeciaeation: . PILES 4 | # | 


logical file code: R{ number 


file status relation: [ file name | # |relational operator | # 
status formula 


file switch declaration: SWITCH# [name | ( = 
Leos 
file switch element: ee = ficemornn 


rae Meaning 


A file declaration serves to define (possibly a segment of) 
a given external storage device as a file in which values may be stored 
and/or from which values may be retrieved. There are currently six 
types of such devices--magnetic tape, drum, disc, card reader and 
punch, and printer. The logical file code specifies the particular device 
in which the file resides. 

Associated with each logical file is a set of conditions, any of 
which may arise during operations involving these files. To permit 
reference to these conditions in a program, the file declaration may in- 
clude a list of status constants, each of which designates a type of con- 
dition. The correspondence between status constants and conditions is 
made through the order in which the status constants are listed in the 
file declaration. In this context, the file name is treated similar to 
status items. The first status constant represents an unsigned integer 


value of 0; the second, 1; the third, 2; and so forth. 
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Logical file conditions may be tested for through the file status 
relation, which is regarded exactly as a status relation. The file switch 
declaration is regarded exactlyas an item switch declaration, where the 
switch item is the file name again treated as a status item. 


The file declaration must precede the first reference to the file. 
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B. In and Out Statements 


iss Construction 


in statement: IN ( , [file name]) $ 
out statement: OUT | , (Hlename]) § 
function code: 


bi Meaning 


Values stored in files are organized within a file in seg- 
ments, which are groups of records. A record is the set of values re- 
corded as the result of the execution of a single ion statement. 

The out statement specifies a file by name to which values will be 
or have been transmitted. It designates via the function code whether 
to open or to close the file. 

The in statement specifies a file by name from which values will 
be or have beentransmitted. It designates via the function code whether 
to open or to close the file. 

A file which is currently open may sendor receive values. A file 


whichis currently closedis prohibited from sending or receiving values. 


EO = 


Cy Ion Statements 


i Construction 


ion statement: IO ( [manipulation list] ) $ |. 
10 ( (Ransmission Ha] ) s 
manipulation list: : ; 
transmission list: F ; 
[terminal action] , [storage Hat] 
terminal action: [procedure name] | 0 
firet word: | | | 
[table name] ($ [subscript] $) | NENT ( [Eablename ) 
number of words: 


Ls Meaning 


Ion statements either manipulate external storage devices, 
or transmit values to or from files on those devices. The number fol- 
lowing IO in an ion statement must not exceed four numerals and must 
be unique to each ion statement in a program. 

If the ion statement is to designate device manipulation, it must 
include a manipulation list; if it is to designate value transmission, it 
must include a transmission list. 

The terminal action, if a procedure name, must designate a pa- 
rameterless procedure that will be invoked when the operation started 
by the ion statement reaches completion. The procedure will then be 
invoked as though a procedure statement naming that procedure were 


written at the point in the program reached when the operation is 
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completed. If the terminal action is zero or absent, no procedure will 
be invoked. 

The first word specifies the address in internal storage of the first 
value to be transmitted. The number of words specifies the number of 
words or entries to be transmitted, and must yield a nonnegative integer 


value. Only the following combinations are defined: 


Used With Used With 
First Serial Parallel 
Word Structure Structure 


Simple Item 


Table Name 
($subscript$) 


Function codes inion statements are defined in the operating system. 
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D. Wait Statements 


Ls Construction 


wait statement: WAIT ( IO [number } ) $ 


Ze Meaning 
The wait statement causes further sequencing of operations 
to be delayed until the operation begun by the ion statement with the same 


number has been completed. 
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X. DIRECT OPERATIONS 


A. Direct Statements 
Ts Construction 


direct statement: DIRECT# | 4 | JOVIAL# 
direct code: fen 


machine code: see R-731A, GE-635 JOVIAL Compiler De- 
sign Document (Supplement) 


assign statement: see next subsection, Assign Statements 


a Meaning 


The direct statement serves todefine a set of operations that 
may be expressed in machine-oriented language. This language must 
consist entirely of certain legal GE-635 machine codes. 

Each machine code is considered a symbol, and the entire line (or 
set of lines) on which it is writtenis considered part of the symbol. Thus, 
assign statements and DIRECT JOVIAL brackets must not appear on 
lines containing machine codes. Machine codes may address locations 
designated by names defined in JOVIAL. The interpretation of such is 
given in subsection II.E, Names and Indexes. 

A label of a machine code, if also constructed as a legal machine 
code labelandalegal JOVIAL statement name, becomes a defined state- 
ment name as though defined on a JOVIAL statement. 

A statement name prefixed to the DIRECT bracket of a direct 
statement is considered to designate the first executable instruction 
within the DIRECT JOVIAL brackets. 

Index registers used in direct statements should be saved on en- 


trance and restored on exit from sequences of machine codes. 
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B. Assign Statements 


l. Construction 


assign statement: ASSIGN# |accumulator designation] = 


$ | ASSIGN# = 
$ 
accumulator designation: A ( |precision| ) | A () 


rae Meaning 


In the first construction the assign statement serves to as- 
sign the value of the basic variable to the machine accumulator; in the 
second construction it serves to assign the value held in the machine ac- 
cumulator to the basic variable. 

The precision, or its absence, specifies the characteristics of the 
machine accumulator (for that statement only) in the manner of a simple 


item, as follows: 


Type of Equivalent Item Description 

Precision, p Basic Variable of Accumulator 

p # 0 numeric A 72 S p 

p = 0 numeric I 72 S 

p= 0 Boolean B 

p= 0 Hollerith H 12 

p = 0 transmission T 12 

p= 0 status S.Ct. 

p absent numeric F 


The effect of the assign statement, so described, is equivalent to 


an assignment statement. 
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INDEX OF CONSTRUCTIONS 


A 


Abs function, 31 

Accumulator designation, 121 
Actual input parameter, 53 
Actual input parameter list, 53 
Actual output parameter, 53 
Actual output parameter list, 53 
Actual parameter list, 53 

Add operator, 33 

All clause, 63 

Arithmetic operator, 11 

Array declaration, 79 

Array name, 21 

Assign statement, 121 


Assignment statement, 43 


B 


Basic function, 29 

Basic variable, 25 

Bit, 89 

Bit designation, 27 

Bit variable, 27 

Boolean assignment statement, 43 
Boolean constant, 17 

Boolean exchange statement, 47 
Boolean formula, 37 

Boolean function, 29 

Boolean item description, 71 
Boolean primary, 37 

Boolean secondary, 37 


Boolean term, 37 


Boolean variable, 25 
Bracket, 11 | 
Byte designation, 27 
Byte variable, 27 


cS 


Char variable, 27 
Close declaration, 97 
Close name, 21 
Comment, 23 
Comment sign, 23 
Complete for clause, 63 
Complex statement, 57 
Compound statement, 57 


Constant, 17 


D 


Data declaration, 57 

Data name, 2l 

Decimal number, 17 
Declaration, 57 

Declaration list, 101 
Declarator, Ill 

Define declaration, 109 

Defined identifier, 109 
Delimiter, ll 

Dependent data sequence, 85 
Dependent data sequence list, 85 
Dependent overlay declaration, 85 
Descriptor, ll 


Dimension, 79 


JOVIAL 


INDEX OF CONSTRUCTIONS 


(Continued) 
Dimension list, 79 Floating item description, 71 
Direct code, 119 Floating variable, 25 
Direct statement, 119 For compound, 64 
For statement, 63 | 

2 Formal input parameter, 101 
Entry assignment statement, 49 Formal input parameter list, 101 
Entry exchange statement, 49 Formal output parameter, 101 
Entry formula, 49 Formal output parameter list, 101 
Entry relation, 49 Formal parameter list, 101 
Entry variable, 49 Formula, 53 
Exchange statement, 47 Function, 29 
Exponent, 33 Function code, 113 

F G 


Raetory. 63 Goto name, 21 


File declaration, Ill 


File name, 21 H 


Goto statement, 51 


File status relation, 111 Hellexith-constane:. 17 


File switch declaration, 111 Hollerith item description, 71 
Hollerith formula, 41 
Hollerith function, 29 


Hollerith variable, 25 


File switch element, 111 
File switch list, 111 
File switch name, 21 
First bit, 27 


First byte, 27 = 

First word, 115 Identifier, 18 

Fixed constant, 17 If clause, 59 

Fixed function, 29 If statement, 59 

Fixed item description, 71 Ifeither clause, 61 

Fixed variable, 25 Ifeither statement, 61 
Floating constant, 17 In statement, 113 
Floating function, 29 Incomplete for clause, 63 
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INDEX OF CONSTRUCTIONS 


(Continued) 
Independent data, 83 Literal item description, 71 
Independent data sequence, 83 Literal relation, 37 
Independent data sequence list, 83 Literal variable, 25 
Independent overlay declaration, 83 Logical file code, 111 
Index, 21 Logical operator, ll 
Index switch declaration, 93 
Index switch element, 93 us 
Index switch list, 93 Machine code, 119 
Index switch name, 21 Manipulation list, 115 
Initial value, 63 Mant variable, 27 
Integer constant, 17 Mark, 9 
Integer function, 29 Mode declaration, 77 
Integer item description, 71 Modifier, 11 
Integer variable, 25 Multiply operator, 33 
Ion statement, 115 N 


Item description, 71 
Name, 21 


Naming, 85 


Item switch declaration, 93 
Item switch element, 93 


Item switch list, 93 Nent function, 31 


Nent variable, 27 
Number, 17 


Item switch name, 21 


= Number of bits, 27 
Length, 85 Number of bytes, 27 
Length descriptor, 12 Number of words, 115 
Letter, 9 Numeral, 9 . 
Like table declaration, 91 Numeric assignment statement, 43 
Literal assignment statement, 43 Numeric constant, 17 
Literal constant, 17 Numeric exchange statement, 47 
Literal exchange statement, 47 Numeric formula, 33 
Literal formula, 41 Numeric function, 29 
Literal function, 29 Numeric item description, 71 
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INDEX OF CONSTRUCTIONS 
(Continued) 


Numeric relation, 37 
Numeric variable, 25 


Nwdsen function, 31 


O 


Octal number, 17 

Octal numeral, 17 

Odd variable, 27 

One-factor for clause, 63 
One-factor for statement, 63 
Operator, 11 

Ordinary entry declaration, 85 
Ordinary entry description, 85 
Ordinary table declaration, 85 
Ordinary table item declaration, 
Orif clause, 61 


Out statement, 113 


P 


Packing, 85 

Packing descriptor, 12 
Part of comment, 23 
Part of identifier, 18 
Pattern descriptor, 12 
Peripheral operator, 11 
Position, 89 
Precision, 17 

Preset description, 79 
Preset descriptor, 12 
Preset list, 79 


Preset value, 75 
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Primary, 33 

101 
Procedure declaration, 
101 


Procedure body, 
101 
Procedure heading, 

Procedure name, 2l 
Procedure statement, 53 
Process declaration, 57 


Program, 105 


R 
Range, 71 
Relation, 37 
Relational operator, 11 
Return statement, 99 


Rounding, 71 


Rounding descriptor, 12 


S 


Scale, 17 
Secondary, 33 
Sector, 115 

Sentence, 57 

Sentence list, 57 
Separator, 11 

Sequence designation, 51 
Sequential operator, 11 
Set name, 21 

Sign, 9 

Sign descriptor, l2 

Signed numeric constant, 75 


Signing, 71 


JOVIAL 


SE°GOO SERIES 


INDEX OF CONSTRUCTIONS 
(Continued) 


Simple item description, 75 
Simple item name, 21 

Simple statement, 57 

Simple variable, 25 

Size, 71 

Specified entry description, 89 
Specified table declaration, 89 
Specified table itemdeclaration, 89 
Statement, 57 

Statement name, 21 

Status assignment statement, 43 
Status constant, 18 

Status constant list, 71 

Status exchange statement, 47 
Status formula, 41 

Status function, 29 

Status item description, 71 
Status relation, 37 

Status variable, 25 

Step value, 64 

Stop statement, 55 

Storage list, 115 

Structure, 85 

Structure descriptor, 12 
Subordinate statement, 64 
Subscript, 25 

Subscript list, 25 

Subscripted variable, 25 
Switch declaration, 57 


Switch item, 93 


-97 — 


Switch name, 21 
Symbol, 23 

Ls 
Table declaration, 57 
Table designation, 27 
Table item name, 21 
Table name, 21 
Term, 33 
Terminal action, 115 
Terminal value, 64 
Test statement, 69 
Three-factor for clause, 63 
Three-factor for statement, 63 
Transmission constant, 17 
Transmission formula, 41 
Transmission function, 29 
Transmission item description, 
Transmission list, 115 
Transmission variable, 25 
Two-factor for clause, 63 
Two-factor for statement, 63 


Type descriptor, ll 


V 


Variable, 25 
Ww 


Wait statement, 117 
Width, 89 
Word, 89 
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1. INTRODUCTION 


The JOVIAL programming language was developed, beginning in early 1958, asa 
language suitable for military command and control applications. It is largely 
computer independent and is amenable to handling real-time problems as well as 

a wide variety of data forms. Based on ALGOL with extensions to match command 
and control objectives, JOVIAL has been officially adopted by both the Army and 
Navy as their standard programming language for command and control systems. 
The Air Force, although without "official" sanction, has made such extensive use of 
JOVIAL that it could be considered their "defacto" standard. 


The GE-625/635 JOVIAL Compiler will process a carefully selected subset of 

the J3 version of JOVIAL. The compiler is syntax-controlled and operates according 
to the logic discussed in the following paragraphs. Several key items will first be 
defined. 


The terms "syntax" and "syntax-controlled" are basic to this method of compilation. 
Syntax is the set of grammatical rules of construction of the JOVIAL language by which 
the entire logic of the compiler is built up; hence, the description, "syntax controlled." 
Parsing is the actual decoding of a JOVIAL statement and the discovery of its structure 
by using the JOVIAL syntax. The result of parsing a statement in the GE-625/635 
JOVIAL compiler is a "Polish notation" representation of its basic components. Polish 
notation is merely a convenient logical format in which to hold the statement for input 
to the succeeding phases of the compiler. 


Information that is generated or accumulated during compilation is kept in specialized 
tables called rolls. The most important characteristic of a roll is its ability to change 
size dynamically. During compilation, a roll continually changes size between fixed 
limits; if necessary, these fixed limits can also be changed dynamically. A synonym 
for a roll is "push-down, pop-up table.'' Since the roll is the heart of information 
storage in the compiler, POP's (program operators) are the basic tools of compiler 
processing logic. A POP is an instruction that, when interpreted, causes some compiler 
function to be performed. Although each individual POP function is small, the complete 
repertoire of POP's supplies all elementary compilation functions required to build the 
compiling logic. 


The various phases of the compiler operate at four different levels of detail. From the 
largest to the smallest these are: the program, block, statement, and element levels. 

A program is an entire JOVIAL program. A block is a section of code between two trans- 
fer targets. A statement is a complete JOVIAL statement. An element is an independent 
subexpression within a JOVIAL statement. 


The compiler consists of eight logical functions or sections -- Parse, Affirm, Influence, 
Diagnose, Finalize, Standardize, Generate, and Assemble -- plus a special Interlude 
phase. Each of these compiler sections is discussed in detail in Chapter 9; the overall 
relationship of these compiler sections to one another is shown in Figure 1. 


The compiler, its storage, and its support system will require an allocation of at least 
24,000 words of core storage and a minimum of five storage devices. If additional core 
storage is available at compile time, the compiler will use it. 
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2. COMPILER INPUTS AND OUTPUTS 


INPUT 
Control Information 
The JOVIAL compiler control parameters are input via the GE-625/635 General 


Comprehensive Operating Supervisor (GECOS) system control card used to initiate 
a JOVIAL compilation. This card has the following format: 


Ls }2] aff] | 9| of frofrsra|i ef} sels7ftefofz0|zoze|zsa 2s]26| zr 20s] 5337 20s 


i lgoVv1 AL) , |P1,,.P2..1P:3, 1B 4.25 


where the possible parametric values, P1-P5 are: 


DECK Produce a binary output file for punching. 

NOLISTIN Do not produce a listing of source deck with error 
indications, 

NOBUG Do not include object code debug. 

COMDK Produce a compressed file from the input deck. 


LISTOUT Produce a listing of binary and symbolic output. 


Any of these parameters may be present on or absent from the control card and any 
parameter may appear in any column, separated from the others by commas. Ifa 
parameter is omitted, the predetermined value assumed is the negative of that para- 
meter. 


An example of a JOVIAL control card is the following: 


[of sl ef sfel a] of ofrofrafihafrabs|se|r7 


[jo VIAL | 
Source Language 
Card Format 
The JOVIAL source card is a free-field format in columns 1 to 72. 
Columns 73 to 80 are reserved for deck identification and sequencing, and are ignored 
by the compiler. 


Program Format 


The first card ina JOVIAL program must be aSTART card. The last card must be a 
TERMS card. 
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All data must be declared before being used in the JOVIAL program. 


To adhere to GECOS specifications, a $ must never appear in column 1 of a source 
card. 


Input Mode 


Any symbolic storage medium may be used to contain a JOVIAL source deck, provided 
that medium is acceptable to GECOS. 


A number of programs may be stacked for input for one compilation under one 
$ JOVIAL control card, in which case the parameters on the $ JOVIAL card apply to 
all programs in the stack and no $ EXECUTE card is allowed for the run. 


Deck Identification 


Immediately preceding the START card in the user's deck, there must be an identifi- 
cation card. The compiler uses this card to create a SYMDEF to be used by GELOAD, 
There are three types of source input to the compiler: a program. (PROGRM), a pro- 
cedure (PROCED), and data to generate a Compool (GENCOM). The format of the 
identification card for each of these is described below. 


Program 


Columns 1-6 contain PROGRM. Columns 8-13 may be blank or contain a name, left- 
justified to be used as the SYMDEF. If no name is present a SYMDEF of six periods 
is created. 


Procedure 


Columns 1-6 contain PROCED. No other identification is necessary. The name of the 
procedure is used as the SYMDEF., 


Compool Generation 


Columns 1-6 contain GENCOM. Columns 8-13 must contain, left-justified, the name of 
this Compool. A Compool is a communications pool established by the programmer and 
used by the compiler during subsequent program compilation. It is a data dictionary . 
containing descriptions and absolute storage locations of items, tables, and other elements 
of the language that are used in common by the various programs. It should be noted that 
the compiler can generate a Compool, or extract data from an established Compool 

during a normal compilation. It cannot generate a Compool and compile a JOVIAL program 
during the same activity. . 
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OUTPUT 
Compiler Listings 
Source Language Listing 


The source listing consists of a one-statement-per-line replication of the JOVIAL 
input deck. 


Each line of the listing has a number at the left margin. This line number is used 
later in object code debugging printouts and in the object code listing as a method of 
correlating object code and debugging output with source language statements. 


In addition to the line number, the sequential card occurrence upon which this 
statement began will appear at the right margin of the listing. This number is for 
use with the ALTER feature in GEFRC. 


The following example shows three input cards first as they appear in a JOVIAL 
deck and then as they appear on the source listing. They are the 369th, 370th, and 
371st cards in the deck: 


Card No. Input Card Contents 

369 FAAB, FORC =0, 1, NENT(FIFI) - 1$§ BEGIN IF FINAL($C$) EQ 
370 HOLD AND FIRST($C$) EQ DFIRST($C$)$ BEGIN TEMPS($0$) = C$ 
371 TEMPS($1$) = TEMPS($1$) + 1$ GOTO FBAA$ END END 


Source Listing 


a ni nn ep RL 


602 FOR C = 0, 1, NENT(FIFI) - 1$ 369 
603 BEGIN 369 
604 IF FINAL($C$) EQ HOLD AND FIRST($C$) 

EQ DFIRST($C$)$ 369 
605 BEGIN 370 
606 TEMPS($0$) = CS 370 
/607 TEMPS($1$) = TEMPS($1$) + 1$ 370 
608 GOTO FBAA$ 371 
‘609 END 371 
610 END 371 


Error messages that pertain toa specific statement follow the statement in the listing, 
and an error pointer appears directly below the erroneous part of the statement. Error 
messages are further described in Appendix C. 
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Object Code Listing 


In addition to the source language listing, there is an object code listing that 
corresponds to the output of the compiler. The object code listing resembles an 
assembly program listing. Specifically, the following fields exist from left to right 
on the page. 


o Core location -- is relative to a base address of 0 
Since this is a relocatable binary deck. 

o Label field -- may or may not exist. If there isa 
label, it is the original JOVIAL label or a generated 
label of the form Gxxxxx where x is an integer. 

o Machine operation mnemonic. 

o Operand(s) -- conventions are the same as those that 
apply to labels. 

o Source statement line number, 

o Octal representation of binary. 

o Octal representation of relocatable bits. 


Error Messages 


Compiler error messages are of two general types: syntactical (construction) errors 
and semantic (usage) errors. The syntactical errors are detected during the first 
phase of compilation and are retained on the error roll for later printout. Semantic 
errors are found during subsequent phases of compilation. Appendix C contains a 
preliminary discussion of JOVIAL syntactical and semantic errors. As previously de- 
scribed under compiler listings, all errors which refer to an individual statement are 
printed below the erroneous part of the statement, Errors which cannot be detected 

at the exact time of occurrence -- that is, the BEGIN and END out of phase -- are noted 
when they become apparent. 


The compiler suppresses the EXECUTE indicator to the operating system when a 
semantic error is encountered in the object code. Unless 200 or more errors of any 
kind are discovered, compilation continues to conclusion. 


BINARY OUTPUT 

On request, the compiler produces a relocatable binary file for the program just 
compiled. This file is in the column binary format and contains the information 
sufficient for loading by GELOAD as specified in the Relocatable Deck Description 
section of the GE-625/635 General Loader manual (CPB-1008). 

NUMERIC VALUES 

Numeric values may be integer, fixed-point, or floating-point. Integer and fixed-point 


values may be carried in one or two words as necessary to conform to their declared 
size. Floating-point values are carried in one computer word. 
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3. OPERATING PROCEDURES 


During checkout the GE-625/635 JOVIAL compiler is treated as an object program and 
is initiated by a$ EXECUTE card. After checkout the compiler operates as a system 
program under the control of GECOS and is initiated by a $ JOVIAL card. 


- When the compiler is operated as a system program, the following system control card 
configuration is a minimum requirement: 


$ ENDJOB 


The inclusion of a $ EXECUTE card during a compilation run causes a bit to be set 
in the switch word. By examining this bit, the compiler determines whether or nota 
B*file is to be created. B* contains $ OBJECT followed by $ DKEND for Compool 
generation runs and for a noncompiling source deck. 


Figure 2 illustrates the compiler's operating environment. 


GE-GOO SERIES 


JOVIAL 
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FIGURE 2 - OPERATING ENVIRONMENT FOR THE JOVIAL COMPILER 
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4, RESTRICTIONS 


JOVIAL LANGUAGE RESTRICTIONS 

The following are language variations in GE-625/635 JOVIAL: 
- DUAL items are excluded 

- STRING items are excluded 

~ Medium table packing is treated like dense table packing 

- The J3X 1/0 are implemented a 


- GE-625/635 GMAP assembly code (excluding all MACRO instructions) is the only 
legal type of direct code 


- To conform with the conventions of GECOS, a $ must not appear in column 1 of an 
input card 


~- To conform with the conventions of GELOAD, procedure names must not be more 
than six characters 


JOVIAL SOURCE PROGRAM SIZE RESTRICTIONS 


The JOVIAL object program will always be compiled in a size that will operate within 
the same core allocation made to the compiler. Thus, if the compiler has allocated 

to it 24,000 words of core storage, it will compile a JOVIAL program whose expansion 
will occupy not more than 24,000 words of storage. For larger core allocations, all 
compiler rolls are dynamically allocated such that there is no wasted space and no need 
to penalize one program in favor of another. 


A linear equation expresses the allocation of core in terms of compiler rolls: 


Cy! + Cy De oes CL = Available Roll Memory 


where Cy; Co,...,C,, are coefficients representing such things as roll group size and I, 
D, and L are the number of entries in a particular roll. 
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0. DIRECT CODE 


The DIRECT statement in the JOVIAL language serves to define a set of operations 
which may be expressed in machine-oriented language. This language consists of 
GE-625/635 GMAP codes as defined below. Each line of machine code is considered 
a symbol, thus, comments, ASSIGN statements, and DIRECT or JOVIAL brackets 
must not appear on lines containing machine code instructions. Direct code may 
address locations designated by names defined in JOVIAL. A label of a direct code 
instruction, if constructed as a legal JOVIAL statement name becomes a defined state- 
ment name as though defined on a JOVIAL statement. A statement name prefixed to 
the DIRECT bracket is considered to designate the first executable instruction within 
the DIRECT JOVIAL brackets. Index registers used within DIRECT JOVIAL brackets 
should be saved and restored within those brackets. 


INSTRUCTION REPERTOIRE 

The GE-625/635 coding for use in DIRECT code are the instruction mnemonics listed 
in Appendix B of the GE 625/635 Programming Reference Manual (CPB-1004) with the 
following exceptions: LREG, SREG, STBA, and STBQ, In addition, the following 
pseudo codes are allowed: ZERO, SYMREF. 

INSTRUCTION FORMAT 


The machine code instructions within the DIRECT code must adhere to the following 
format: 


Columns 1-6 label field 
The label must be a legal GMAP label containing no special characters. If this label is 
to be referenced from a JOVIAL statement, the label must also adhere to legal JOVIAL 
label criteria. 

Column 7 even-odd field 
An E causes the instruction to be given an even address and an O causes the instruction 
to be given an odd address. A blank causes no Significance to be given to addressing in 
terms of even or odd. 

Columns 8-15 operation field 


Instruction mnemonic begins in column 8. 


Columns 16-72 location and comment field 
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This field has three subfields: subfield 1, subfield 2, and subfield 3. 
e@  Subfield 1 may contain an operand, 
e Subfield 2 may contain an operand or a modifier. 
e Subfield 3 may contain comments. 


®  Subfield 1 and subfield 2 are separated by a comma and 
subfield 2 and subfield 3 are separated by a blank. 


An operand may be a JOVIAL name or label or a legal DIRECT machine code label or a 
constant of the form d where d is a pure numeric decimal, or a constant of the form = 
0 dd where dd is an octal number. Modifier is a legal GMAP modifier, i.e., DU. Any 
blank encountered in columns 16-72 terminates subfield 1 and subfield 2 and causes the 
remaining columns to be considered as comments. 


Decimal increments or decrements are allowed in subfield 1 and subfield 2. 


Either subfield may contain an asterisk which is translated as the address of the in- 
struction of which this operand field is a part. 


Special consideration is given to the instructions STCA and STCQ in the following manner. 


Subfield 2 must contain two octal characters whose bit configuration represent the 
character positions of the data referenced in subfield 1 which are stored. 
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6. OBJECT CODE INPUT/OUTPUT IMPLEMENTATION 


INPUT/OUTPUT REQUESTS 
The J3X JOVIAL I/O requests have the form: 


1On(FCN, FILENAME, XEC, DATANAME, PARAMETER) $ 


where FCN = code of operation to be performed 

FILENAME = internally declared name of this file 

EXC = name of a parameterless procedure 
to be executed upon completion of the 
I/O request 

DATANAME = name of data storage area 

PARAMETER = number of elements in data storage area 

TOn = where n, a number of four digits or less, 
is the unique name of this particular re- 
quest, 


This information is processed by the compiler and used to generate a calling sequence 
to a subroutine called in at object program runtime, This subroutine then causes 

the I/O request to be operated. The calling sequence to this subroutine has the follow- 
ing elements included: 


FCN = numeric code of operation to be performed 
FILE number = number associated with the FILENAME 
by a JOVIAL FILE declaration 


DATA address address of DATANAME 


PARAMETER number of words of data storage 
FILE STATUS 
WORD = address of a location in which to store 


status information about this I/O request 
FILE CONTROL 
The J3X JOVIAL I/O file control requests have the following form: 


IN (FCN, FILENAME) 
OUT (FCN, FILENAME) 


where FCN = code of the operation, i.e., close or open, 
to be performed 
FILENAME = internally declared name of this file 
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This information is processed by the compiler and used to generate a calling sequence 
to a subroutine called in at object program run time. This subroutine then does the 
bookkeeping needed to perform the file control and also causes any device movement 
necessary, i.e., rewind. The calling sequence to this subroutine includes the follow- 
ing elements: 


FCN = numeric code of operation to be performed 
FILE number = number associated with the FILENAME 
by a JOVIAL FILE declaration 


INPUT/OUTPUT STATUS CHECKING 


The JOVIAL FILE declaration includes a list of allowable status constants for the 
named file. The interfacing routine that causes the I/O request to be performed 
stores the status of the device into a status word upon completion of the I/O request. 
Upon encountering a status check request, a status constant corresponding to that 
particular request is compared to the defined bit configuration in the status word of 
the given file, thus providing the desired check. (The I/O status codes were not 
available at the time of printing of this manual. ) 
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7. COMPILER INTERFACES 


GECOS 


The JOVIAL compiler operates as a system program under the control of GECOS. 

All control cards necessary to the operation of GECOS are used, including a $ JOVIAL 
card that signals the initiation of a JOVIAL compilation to GECOS. The compiler is in 
a binary relocatable format acceptable to GELOAD for loading into memory from a disc 
storage device known to GECOS. 


At execution, the compiler obtains its control information from the switch word set up 
by GECOS from data on the $ JOVIAL control card. 


All input and output requests from the compiler are processed by GEFRC using 
specifically formatted calling sequences rather than MACRO instructions. 


The output of the compiler is in a relocatable binary format suitable for loading by 
GELOAD and contains specifically formatted calling sequences for I/O operations. 


GECOS and JOVIAL requirements combine to utilize nine files during compilation. 
These are given below with their GECOS designators: 


File GECOS file code 


Source listing and assembly listing 
Utility work file 
Utility work file 


Source input S * 
Alter deck A * 
Binary output to punch Pp * 
Binary output to operate Bs 
Compool L * 
Comdeck K * 
P * 
* 1 
* 2 


COMPOOL 


The GE-635 Compool is an optional input to the JOVIAL compiler. It provides a diction- 
ary of system data and program variables. Upon encountering data not defined in the 
program, but included in the Compool available to the compiler, the definition of that 
data and any preset values assigned to it in the Compool are added to the compiler rolls 
as if it were internally declared. In actuality, there may be many Compools, but only 
one may be used with a given compilation. 


The user specifies the option of a Compool by requesting the Compool file to be included 
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in the configuration for compilation. The compiler then proceeds, based on the in- 
formation in the file control block that tells whether the Compool file is present or 
absent. 


The Compool format and the type of information that can be contained in the Compool 
are described in Appendix A, 


The program that generates and assembles a Compool is a portion of the compiler with 
slight modifications. The compiler initiates a Compool generation upon encountering 
control information after normal loading. 


MEMORY REQUIREMENTS 


The JOVIAL compiler has the capability to adapt to various memory allocations of 
24,000 words or more. Dynamic allocation of roll storage up to the limits specified 
at compile time makes this possible. 


SUBROUTINE LIBRARY 


The compiler has the capability to generate linkage between object code and the 
FORTRAN library. All calls to procedures that may be present in an object program 
or on a library file generate a fixed-format calling sequence compatible with the exist- 
ing FORTRAN library. 
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8, COMPILER FUNCTIONS 


There are nine major functions in the GE-625/635 JOVIAL compiler. The 

first compilation function, Parse, reduces the JOVIAL source statement input toa 
Polish notation form, Each succeeding function operates on this Polish representa- 
tion of the program as described in the following paragraphs. 


The Polish notation encoded statements are generally taken from the input roll of a 
function (the output roll of a previous function) and put on the work roll. There they 
are operated on by the function and then placed on an output roll. The input roll of 
each function is generally called the Under (function) roll and the output roll is 
generally called the After (function) roll. For example, the input to the Finalize 
function is on the After Diagnose (or Under Finalize) roll and the output of the Finalize 
function is on the After Finalize (or Under Standardize) roll. 


All compiler functions process at least one JOVIAL statement before passing control to 
another function. Some functions process a whole block at one time. And one function 
--Assemble -- processes the program in its entirety. 


PARSE FUNCTION 


The Parse function constitutes the initial phase of the GE-625/635 JOVIAL compiler. 

It accepts JOVIAL source language input from a storage device via the input roll (Under 
Parse roll) and outputs the elements of each statement onto the After Parse roll. Its 
function is to analyze a statement; determine its type and syntactical correctness; re- 
move any unneeded content, e.g., blanks, comments, etc; and reduce the statement to 
a Polish notation representation. 


The Parse function processes one JOVIAL statement and then transfers control to the 
_ Affirm Function. 


AFFIRM FUNCTION 


The Affirm function is responsible for the further processing of a statement on the 
After Parse roll, now called the Under Affirm roll. The constant and variable operands 

_ that appear on the Under Affirm roll in literal form are removed and placed on data 
description rolls, such as the Constant and Identifier rolls. In addition, Affirm adds 
descriptive information concerning the occurrence and type of these operands to the 
data description rolls. On the After Affirm roll, the literal operands are replaced by 
pointers to the data description rolls. 


The Affirm function processes one JOVIAL statement and then transfers control to the 
Influence function. 
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INFLUENCE FUNCTION 


The Under Influence roll provides one statement to the Influence function. Influence 
will analyze the statement in order to provide contextual information concerning 
operand traits. When Influence has completed a statement, it will put it on the out- 
put roll where it can be spilled onto magnetic tape if required. 


The Influence function processes one JOVIAL statement and returns control to Parse, 
unless it is the end of the source program. If it is the end of the program, the 
Interlude function is called. 


INTERLUDE FUNCTION 


The purpose of the Interlude function is to perform needed processing of the data de- 
scription rolls. Specifically, the traits that were previously generated for Identifiers 
are encoded to simplify subsequent processing. Also, data storage is partially 
allocated for each data entry, e.g., Constant storage + 53. 


The Interlude function transfers control to the Diagnose function. 
DIAGNOSE FUNCTION 


The source program listing is generated and output during the Diagnose function. The 
Diagnose function has two main sections: Type and Convert. 


1. Type Section 
The Type section attaches type information to each operator and operand and 
detects any remaining source language errors. It uses trait information 
supplied by the previous functions to accomplish this task. 


2. Convert Section 


The Convert section determines where arithmetic conversions are required in 
the object code and inserts the conversion drivers on the After Diagnose roll. 


The Diagnose function processes one JOVIAL statement and transfers control to the 
Finalize function. 


FINALIZE FUNCTION 


The finalize function is a key function of the JOVIAL compiler. It prepares the JOVIAL 
program for object code generation. That is, it rearranges, optimizes, and computes 
additional information to facilitate code generation. The Finalize function consists of 
three main sections: Analysis, Unnest, and Collapse. 
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1. Analysis Section 


The Analysis section computes information concerning the type of an ex- 
pression - for example, the fact that an expression is linear or nonlinear, 
constant or variable -- which will be important to the Generate function. 
This information is added to the existing Polish notation code. 


2. Unnest Section 


The Unnest section takes expressions that must be computed and retained in 
temporary storage and locates them for proper code generation, that is, in 
front of other expressions of which they are a part. 


3, Collapse Section 


The Collapse section recognizes duplicate expressions and replaces repeated 
occurrences with a reference to the initial expressions. 


The Finalize function processes one JOVIAL statement and then transfers control back 
to the Diagnose function, unless it is the end of a block. If it is the end of a block, the 
transfer is to the Standardize function. 


STANDARDIZE FUNCTION 


The Standardize function processes an entire block at one time. It puts the results of 
the Collapse section of the Finalize function in standard Polish notation form and sets 
up the proper references to generate labels and temporary storage. 


When the block is processed, the Standardize function transfers control to the Generate 
function. 


GENERATE FUNCTION 


The Generate function translates Polish notation code into GE-625/635 machine code. 
The Generate function is the first function in the compilation process in which the 
machine-independent Polish notation code is replaced by a machine-dependent code. The 
output roll from the Generate function can be spilled onto an intermediate file if required. 


The Generate function processes an entire block of the program at one time. If this is 
the last block of the program, control is passed on to the Assemble function; otherwise, 
control is transferred back to the Diagnose function. 


ASSEMBLE FUNCTION 
The Assemble function is similar to the second pass of a normal GE-625/635 assembly 


program, {it turns the entire program into a relocatable binary output. In addition, the 
Assemble function outputs the object code listing and the memory storage map. 
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APPENDIX A 


COMPOOL DESCRIPTION 


COMPOOL CONTENT 


The JOVIAL Compool may contain any of the following types of information. 


Program Descriptions 


1, 
2. 


Program name 
Program length 


Table Descriptions 


Ol yk © DO 


Table name 

Variable or rigid length indicator 
Number of entries 

Parallel or serial structure indicator 
Number of words per entry 


Item Descriptions 


1, 
2. 
3. 


4 
D 
6, 
Te 
8 
9 
1 


Item name 
Table name (if this item is in a table) 
Item type 
A-Fixed-point 
B-Boolean 
I- Integer 
F-Floating-point 
H-Hollerith 
T-Standard Transmission 
S-Status 
Number of bits or bytes 
Signed or unsigned (if applicable) 
Number of fractional bits (A type only) 
Word number within entry (for items within completely defined tables) 
Initial bit position within the word (for items within completely defined tables) 
Location of status constants in the status constant area (S type only) 


0. Number of status constants associated with this item (S type only) 


Status Constants 


Status constants corresponding to all items or arrays declared as §S type. 
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Array Descriptions 


1, Array name 

2. Array type (A, B,I, F, H, T,S as defined in 3 of Item Descriptions) 

3. Number of dimensions 

4. Size of each dimension 

5. Signed or unsigned (if applicable) 

6. Number of fractional bits (A type only) 

7. Location of status constants in the status constant area (S type only) 

8. Number of status constants associated with this array (S type only) 
FORMAT 


Compool Format 

The Compool consists of a set of rolls like those that result from a normal compila- 
tion. The number and order of the rolls is a function of what is required by the com- 
piler to express data and program declarations. 


Compool File Format 


The Compool file is one binary record containing the information generated by a 
Compool generation run, 


OPERATING PROCEDURES 


The operation of making a Compool file is initiated in the same manner as that for a 
JOVIAL compilation. 


Input 


The first card input to the JOVIAL compiler during a Compool generation run has 
GENCOM in columns 1 to 6. This signals the compiler to generate a Compool rather 
than to compile a program. Following the GENCOM card is the environment definition 
cards, whose content is described in the Compool Contents paragraph above. A TERMS$ 
card terminates the input deck, 


The format of the Compool definition cards is identical to that of their counterpart, 
JOVIAL declarations. 


Output 


The normal output of a Compool generation run is (1) a binary file containing the 
Compool, and (2) a file for listing its contents. 
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Method 


The Compool generation run is adapted from the first two phases of the JOVIAL 
compiler. Modifications are made to remove unneeded capabilities. The basic 
logic is that of the compiler. 


Usage 
The JOVIAL compiler is the ultimate user of the Compool information. Upon de- 
termining that a Compool file is present, the compiler takes data from that file, as 


it is referenced by the object program, and adds the data to the proper rolls. 


The order of data reference for the compiler is local, global, and then Compool. 
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APPENDIX B 


OBJECT CODE DEBUG 


At the programmer's option, the JOVIAL compiler automatically includes debugging 
aids in the program being compiled. No control information is required from the 
programmer other than to specify the inclusion or exclusion of debugging (See Control 
Information under the Input paragraph of Chapter 2). 


The compiler analyzes the source program as it is being compiled to determine the 
importance of variables, to recognize loops, and to understand the general flow of the 
program. Using this information it inserts code to provide for: 


1, Dumps of key variables -- e.g., FOR variables, assignment 
variables, I/O variables -- as they change. 


2. A program trace, which is a list of program transfers 
3. A listing of procedure entrances and exits. 


All debug information starts with the name of the program. The main program is 
signified by an asterisk. Each statement trace starts with the compiler-assigned 
statement number followed by a slash mark. In an assignment statement, this is 
followed by the variable name (subscripted if necessary) and the value assigned to 

it. For the FOR statements, the value of the induction variable is given for each iter- 
ation. 


Tracing automatically terminates after each statement has been executed n times, where 
nis asystem parameter, The format is (1) line number, (2) OFF, (3) the number of 
statements executed prior to termination, and (4) the number of statements executed 
during the trace-off mode, Automatic tracing resumes when statements which have not 
been previously executed n times are encountered. 


IF, IFEITH, and SWITCH statements are followed by the values of their expressions. 
The final debug information supplied under post-mortem consists of the results of the 
last three executions of each statement. The format is (1) line number, (2) number of 
times the statement was executed, and (3) the last three values. Statements not execut- 
ed three times show values in accordance with the number of executions. 
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APPENDIX C 


COMPILER ERROR MESSAGES 


The general form of the JOVIAL compiler error messages is described under the 
Output paragraph in Chapter 2, Each message is self-explanatory; that is, there 
are no error numbers that must be looked up in a supplementary error list. 


Some types of errors that may be detected and corresponding error messages that 
are printed follow. 


1. ALPHA ($A, he = TWODARRAY ($A$)$ 
Syntax Error Too Few ues 
2. BETA = 1,.25A2 + es 
Arithmetic Type Required 
3. IF ALPHA ; BETA$ 


Syntax Error 
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